Outlook에서 모든 빈 하위 폴더를 일괄 삭제하는 방법

Outlook 솔루션 2025 년 9 월 29 일

Outlook에서 모든 빈 하위 폴더를 일괄 삭제하려면이 문서에서 소개 한 방법을 사용할 수 있습니다. Outlook VBA를 사용하여 하위 폴더를 일괄 적으로 삭제하는 방법을 알려줍니다.

따라서 Outlook 이메일을 더 잘 분류하고 관리하려면받은 편지함, 보낸 편지함 또는 임시 보관함 폴더 등에 관계없이 기본 폴더 아래에 많은 사용자 지정 하위 폴더를 만들어야합니다. 그러나 일부 하위 폴더가 자주 사용되지 않는 경우도 있습니다. 익숙한. 따라서 most 시간이 지나면 항목없이 비어 있습니다. 이 경우 빈 하위 폴더를 모두 삭제하려고합니다.

일반적으로 이러한 하위 폴더를 마우스 오른쪽 버튼으로 클릭 한 다음 오른쪽 클릭 메뉴에서 "폴더 삭제"를 선택할 수 있습니다. 그럼에도 불구하고 빈 하위 폴더가 많은 경우 하나씩 삭제하는 것은 상당히 번거 롭습니다. 따라서 한꺼번에 모두 삭제하려면 팁을 기다려야합니다. Outlook은 이러한 기능을 제공하지 않지만 VBA 코드를 사용하여 빠르게 실현할 수 있습니다. 다음에서는 정교한 단계와 코드를 보여 드리겠습니다.

모든 빈 하위 폴더 일괄 삭제

우선, start Outlook 프로그램.
그런 다음 기본 Outlook 창에서 "Alt + F11"키 버튼을 누릅니다.
다음으로 "Microsoft Visual Basic for Applications"창에서 사용하지 않는 모듈을 엽니 다.
그런 다음 다음 VBA 코드를 복사하여이 모듈에 붙여 넣습니다.

Public Sub GetAllSubfolders()
    Dim objFolders As Outlook.Folders
    Dim objFolder As Outlook.Folder
    Dim i As Long
 
    On Error Resume Next
 
    'Change "Personal" to the name of your Outlook data file
    Set objFolders = Outlook.Application.Session.Folders("Personal").Folders
 
    For Each objFolder In objFolders
        If objFolder.Folders.Count > 0 Then
           For i = objFolder.Folders.Count To 1 Step -1
               Call DeleteEmptyFolder(objFolder.Folders(i))
           Next
        End If
    Next
 
    MsgBox ("Completed!")
End Sub

Public Sub DeleteEmptyFolder(objCurrentFolder As Outlook.Folder)
    Dim objSubFolder As Outlook.Folder
    Dim n As Long
 
    If objCurrentFolder.Items.Count = 0 Then
       objCurrentFolder.Delete
    End If
 
    'Process the subfolders recursively
    If objCurrentFolder.Folders.Count > 0 Then
       For n = objCurrentFolder.Folders.Count To 1 Step -1
           Set objSubFolder = objCurrentFolder.Folders(n)
           Call DeleteEmptyFolder(objSubFolder)
       Next
    End If
End Sub

그런 다음 Outlook 매크로 보안 수준을 낮음으로 변경하십시오.
결국 현재 매크로 창에서 "F5"키 버튼을 눌러이 매크로를 실행할 수 있습니다.
즉시 모든 빈 하위 폴더가 삭제된다는 것을 알게 될 것입니다.

손상된 Outlook PST 데이터 검색

Outlook은 오류 및 손상에 취약하기 때문에 Outlook PST 파일 보호에주의를 기울여야합니다. 예를 들어 PST 데이터를 정기적으로 백업해야합니다. 또한 수리 Outlook 가능한 한 빨리 문제를 해결하려면 다음과 같은 평판이 좋고 강력한 수정 도구를 준비해야합니다. DataNumen Outlook Repair.

저자 소개 :

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