3.5 將資料夾從一個父資料夾移動到另一個父資料夾

為什麼我要引用資料夾？在下一部分中，我將向你展示如何訪問引用資料夾中的電子郵件。在這裡，我將向你展示如何移動資料夾。我在收件箱中建立了一個名為 Test 的資料夾。在 TestMoveFolder() 中，我將 A 替換為包含我的收件箱的商店的名稱。執行 TestMoveFolder() 將測試移動到已刪除專案。

Sub TestMoveFolder()

  Dim FldrDest As Folder
  Dim FldrToMove As Folder

  Set FldrToMove = Session.Folders("A").Folders("Inbox").Folders("Test")
  Set FldrDest = Session.Folders("A").Folders("Deleted Items")
  
  FldrToMove.MoveTo FldrDest

End Sub