S 일 때 VBA를 통해 모든 폴더를 자동 확장하는 방법tar당신의 Outlook을

Outlook 솔루션 2025 년 9 월 29 일

여러 사용자는 Outlook을 시작할 때 모든 폴더가 자동으로 확장되기를 바랍니다. 실제로 Outlook은 기본적으로 지원하지 않습니다. 따라서이를 실현하려면 VBA 코드를 사용해야합니다. 이 post 빠른 가이드를 제공합니다.

Outlook의 기본 폴더 아래에 많은 하위 폴더를 만들었을 수 있습니다. 너무 많은 폴더에 대해 언제든지 빠르게 액세스 할 수 있도록 모든 폴더를 항상 확장 상태로 유지하는 것이 좋습니다. 첫 번째 단계는 Outlook이 s의 폴더를 자동으로 확장하도록 만드는 것입니다.tar대가리. 분명히 Outlook에는 이러한 기본 기능이 없습니다. 따라서 매크로를 사용해야합니다. 이후에는 VBA로이를 달성하는 방법을 알려 드리겠습니다. VBA 적용 방법은 다른 기사를 참조하십시오.“Outlook에서 VBA 코드를 실행하는 방법".

S 일 때 모든 폴더 자동 확장tar팅 아웃룩

먼저 Outlook에서 "Alt + F11"을 눌러 VBA 편집기에 액세스합니다.
그런 다음 새 창에서 코드를 "ThisOutlookSession"프로젝트에 넣습니다.

'Auto expand all folders on startup
Private Sub Application_Startup()
    Call ExpandAllFolders
End Sub

Private Sub ExpandAllFolders()
    Dim objCurrentFolder As Outlook.Folder
    Dim objStore As Outlook.Store
    Dim objFileFolders As Outlook.Folders
    Dim objFolder As Outlook.Folder
   
    Set objCurrentFolder = Application.ActiveExplorer.CurrentFolder
 
    'Process all email accounts in your Outlook
    For Each objStore In Outlook.Application.Session.Stores
        Set objFileFolders = objStore.GetRootFolder.Folders
 
        For Each objFolder In objFileFolders
            Call LoopFolders(objFolder)
        Next
 
        DoEvents
        Set Application.ActiveExplorer.CurrentFolder = objCurrentFolder
    Next
End Sub

Sub LoopFolders(ByVal objCurFolder As Outlook.Folder)
    Dim objSubfolder As Outlook.Folder
 
    Set Application.ActiveExplorer.CurrentFolder = objCurFolder
    DoEvents
 
    'Process all subfolders recursively
    If objCurFolder.Folders.Count > 0 Then
       For Each objSubfolder In objCurFolder.Folders
           Call LoopFolders(objSubfolder)
       Next
    End If
End Sub

그 후 VBA 편집기를 닫습니다.
그런 다음 Outlook 응용 프로그램을 제대로 종료하십시오.
나중에 star당신의 Outlook. 이 시점에서 매크로가 자동으로 실행됩니다.
Outlook s 이후tar아래 그림과 같이 모든 폴더가 확장되었음을 알 수 있습니다.

모든 악성 매크로를 차단

의심스러운 파일이 첨부되었거나 알 수없는 링크가 포함 된 이메일을받은 적이 있습니까? 일반적으로 이러한 이메일에 직면 할 때는 경계를 높여야합니다. 바이러스를 운반 할 수 있다는 점에서 쉽게 신뢰해서는 안됩니다. 첨부 파일을 다운로드하거나 링크를 열면 Outlook뿐만 아니라 컴퓨터도 공격을받을 수 있습니다. 그 때, 당신은 수리 Outlook 파일. 업데이트 된 Outlook 백업이 없거나 다음과 같은 강력한 복구 도구를 사용하지 않는 한 상당히 복잡 할 수 있습니다. DataNumen Outlook Repair.

저자 소개 :

Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. SQL Server 부패 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM