Outlook에서 삭제하기 전에 폴더의 항목을 상위 폴더로 자동 이동하는 방법

지금 공유 :

기본적으로 Outlook에서 폴더를 삭제하면 해당 항목도 "지운 편지함"폴더로 이동됩니다. Outlook에서 폴더의 항목을 삭제하기 전에 상위 폴더로 자동 이동하도록하려면이 문서에서 공유하는 방법을 사용할 수 있습니다.

폴더를 삭제하면 Outlook에서 모든 내용이 "지운 편지함"폴더로 이동된다는 경고 메시지가 표시됩니다. 하지만, most 시간이 지나면 저장된 항목을 포함하지 않고이 폴더를 삭제하기 만하면됩니다. 따라서 항목이 폴더의 상위 폴더로 자동 이동되기를 바랍니다. 여기서는 VBA를 통해이를 실현하는 방법을 알려드립니다. VBA에 대해 전혀 모르는 경우 먼저 이전 기사를 읽을 수 있습니다.“Outlook에서 VBA 코드를 실행하는 방법".Outlook에서 삭제하기 전에 폴더의 항목을 상위 폴더로 자동 이동

폴더의 항목을 삭제하기 전에 상위 폴더로 자동 이동

  1. 먼저 "Alt + F11"을 통해 Outlook VBA 편집기에 액세스합니다.
  2. 그런 다음 새 창에서 "ThisOutlookSession"프로젝트를 엽니 다.
  3. 그런 다음 다음 VBA 코드를 복사하여이 프로젝트에 붙여 넣습니다.
'Display the macro in the context menu
Sub Application_FolderContextMenuDisplay(ByVal CommandBar As Office.CommandBar, ByVal Folder As Outlook.Folder)
    Dim objCommandBarButton As Office.CommandBarButton
 
    Set objCommandBarButton = CommandBar.Controls.Add(msoControlButton)
    With objCommandBarButton
         .Style = msoButtonIconAndCaption
         .Caption = "[Smart] Delete Folder"
         .FaceId = 1668
         .OnAction = "Project1.ThisOutlookSession.DeleteFolder_MoveItemsToParentFolder"
    End With
End Sub

Sub DeleteFolder_MoveItemsToParentFolder()
    Dim objCurrentFolder As Outlook.Folder
    Dim objParentFolder As Outlook.Folder

    Set objCurrentFolder = Outlook.ActiveExplorer.CurrentFolder
    Set objParentFolder = objCurrentFolder.Parent
    
    Dim i As Long
    'Move items to parent folder
    For i = objCurrentFolder.Items.Count To 1 Step -1
        objCurrentFolder.Items.Item(i).Move objParentFolder
    Next
 
    'Delete the current folder
    objCurrentFolder.Delete
End Sub

ThisOutlookSession 프로젝트에 코드 복사

  1. 그 후에 지금 주사를 맞을 수 있습니다.
  2. 먼저 삭제하려는 하위 폴더를 마우스 오른쪽 버튼으로 클릭합니다.
  3. 그런 다음 컨텍스트 메뉴에서 "[스마트] 폴더 삭제"옵션을 선택합니다.폴더 스마트 삭제
  4. 한 번에 Outlook은 폴더를 삭제하고 항목을 상위 폴더로 이동합니다.
  5. 제 경우에는 "To Bob"하위 폴더를 삭제합니다. 상위 폴더는 "보낸 항목"입니다. 따라서 다음 스크린 샷과 같이 모든 항목이 "보낸 항목"으로 이동되었습니다.항목이 상위 폴더로 자동 이동 됨

Outlook이 취약하다는 점을 명심하십시오.

의심의 여지가없는 사실을 명심해야합니다. Outlook은 오류나 손상에 취약합니다. 따라서 바이러스, 부적절한 종료 등을 포함하여 Outlook 데이터 파일 주변의 모든 잠재적 위협에주의해야합니다. 게다가 다음과 같은 강력하고 신뢰할 수있는 Outlook 수정 도구를 준비하는 것이 좋습니다. DataNumen Outlook Repair. 그것은 당신을 도울 수 있습니다 Outlook 수정 몇 분 안에 문제

저자 소개 :

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

지금 공유 :

댓글이 닫혀있다.