如何在 Outlook 中找回因誤操作而移動遺失的資料夾？
您可能在 Outlook 中不小心移動了某個資料夾，但要找到它並移回原始位置卻不容易。本文將介紹四種方法，協助您輕鬆找回因誤操作而「遺失」的 Outlook 資料夾。
透過「資料夾大小」選項尋找因誤操作而遺失的資料夾
透過搜尋與瀏覽功能尋找因誤操作而遺失的資料夾
透過 VBA 程式碼尋找因誤操作而遺失的資料夾
使用強大工具輕鬆尋找因誤操作而遺失的資料夾
透過「資料夾大小」選項尋找因誤操作而遺失的資料夾
假設遺失的資料夾名稱為「Internal」，您可透過「資料夾大小」對話方塊瀏覽所有資料夾名稱，輕鬆找到它。請依照下列步驟操作：
1. 在導航中按一下滑鼠右鍵，然後從右鍵功能表中點選資料檔內容。請參閱螢幕截圖：
2. 在 Outlook 今日對話方塊中，切換至一般索引標籤，然後點選資料夾大小按鈕。在開啟的資料夾大小對話方塊中，於資料夾清單中快速找到您遺失的資料夾。請參閱螢幕截圖：
3. 返回 Outlook 主介面，依上述檔案路徑找到該資料夾，並手動拖曳回原位。
Outlook 中的 AI 郵件助理：聰明回覆、清晰溝通，一鍵輕鬆搞定！
透過 Kutools for Outlook 的 AI 郵件助理，輕鬆簡化您每日的 Outlook 工作！這款強大工具能學習您過往的郵件內容，提供智慧又精準的回覆建議、優化郵件文字，並協助您毫不費力地起草與潤飾訊息。
此功能支援：
- 智慧回覆：根據您過往的對話，量身打造精準到位的回應，立即可用。
- 內容強化：自動優化您的郵件文字，提升清晰度與影響力。
- 輕鬆撰寫：只需提供關鍵字，其餘交給 AI 處理，並支援多種潤色風格。
- 智慧擴充：根據上下文提供貼心建議，延伸您的創意與想法。
- 摘要功能：立即獲取長篇郵件的簡明摘要。
- 全球溝通：輕鬆將郵件翻譯成任何語言。
此功能支援：
- 智慧郵件回覆
- 優化內容
- 關鍵字草稿
- 智慧內容擴充
- 郵件摘要
- 多語言翻譯
別再等待——立即下載 AI 郵件助理，盡情享受！
透過搜尋與瀏覽功能尋找因誤操作而遺失的資料夾
若您記得遺失資料夾中任一封電子郵件的主旨，可依下列步驟搜尋該主旨，快速找回資料夾。
1. 點選搜尋方塊，將搜尋範圍切換為所有郵件匣，再於搜尋方塊中輸入電子郵件主旨的任一關鍵字。請參閱螢幕截圖：
2. 系統將自動搜尋並在郵件列表中顯示該電子郵件，請雙擊以開啟。
3. 按下 Ctrl+Shift+F 鍵，即可開啟進階搜尋對話方塊（或直接選取該電子郵件，再點選）搜尋> 搜尋工具> 進階搜尋）。在對話方塊中，您會在位於欄位中看到所選電子郵件所在資料夾的名稱，請點選瀏覽按鈕。
4. 在選取資料夾對話方塊中，您將看到遺失資料夾目前所在的位置。記下檔案路徑，然後點選確定按鈕。
5. 返回 Outlook 主介面，依照上述檔案路徑找到遺失的資料夾，並手動拖曳回原始位置。
透過 VBA 程式碼尋找因誤操作而遺失的資料夾
若您記得遺失資料夾的名稱，可直接透過名稱快速尋找。
1. 按下 Alt+F11 鍵，立即開啟 Microsoft Visual Basic for Applications 視窗！
2. 在 Microsoft Visual Basic for Applications 視窗中，點選插入＞ 模組，接著將下方的 VBA 程式碼複製到程式碼視窗中。
VBA 程式碼：透過名稱尋找遺失的資料夾
Private g_Folder As Outlook.MAPIFolder
Private g_Find As String
Public Sub FindFolder()
Dim xFldName As String
Dim xFolders As Outlook.Folders
Dim xYesNo As Integer
On Error Resume Next
Set g_Folder = Nothing
g_Find = ""
xFldName = InputBox("Folder name:", "Kutools for Outlook")
If Trim(xFldName) = "" Then Exit Sub
g_Find = xFldName
g_Find = UCase(g_Find)
Set xFolders = Application.Session.Folders
LoopFolders xFolders
If Not g_Folder Is Nothing Then
xYesNo = MsgBox("Activate folder: " & vbCrLf & g_Folder.FolderPath, vbQuestion Or vbYesNo, "Kutools for Outlook")
If xYesNo = vbYes Then
Set Application.ActiveExplorer.CurrentFolder = g_Folder
End If
Else
MsgBox "Not found", vbInformation, "Kutools for Outlook"
End If
End Sub
Private Sub LoopFolders(Folders As Outlook.Folders)
Dim xFolder As Outlook.MAPIFolder
Dim xFound As Boolean
On Error Resume Next
xFound = False
For Each xFolder In Folders
If UCase(xFolder.Name) = g_Find Then xFound = True
If xFound Then
Set g_Folder = xFolder
Exit For
Else
LoopFolders xFolder.Folders
If Not g_Folder Is Nothing Then Exit For
End If
Next
End Sub3. 按下 F5 鍵以執行程式碼。
4. 在 Kutools for Outlook 對話方塊中，於文字方塊輸入遺失資料夾的名稱，然後點選確定按鈕。
5. 在接下來出現的對話方塊中，點選是按鈕。
6. 遺失的資料夾隨即會在導航窗格中自動開啟，請手動將其拖回原位。
使用強大工具輕鬆尋找因誤操作而遺失的資料夾
Kutools for Outlook 提供實用功能——打開指定 Outlook 資料夾，助您輕鬆尋找並快速導航至特定 Outlook 資料夾！請依下列步驟操作：
點選此處，立即下載 Kutools for Outlook！
1. 安裝 Kutools for Outlook 後，點選 KUTOOLS PLUS > 前往。請參閱螢幕截圖：
2. 在前往對話方塊中，請依下列方式進行設定。
相關文章：
- 如何計算 Outlook 中指定電子郵件帳戶或所有郵件匣底下的資料夾數量？
- 如何在 Outlook 中將多個帳戶的收件匣統一顯示，一次掌握所有電子郵件？
- 如何在 Outlook 中開啟「瀏覽資料夾」對話方塊以選擇目標資料夾？
- 如何計算 Outlook 中特定資料夾底下的子資料夾數量？
最佳 Office 生產力工具
體驗全新 Kutools for Outlook，內含 100+ 項超強功能！立即點擊下載！
🤖KUTOOLS AI：運用先進 AI 技術，輕鬆處理電子郵件——無論是回覆、摘要、優化、擴充、翻譯還是撰寫郵件，通通一鍵搞定！
📧 郵件自動化：自動答覆（支援 POP 與 IMAP）／預約寄送郵件／寄信時依規則自動抄送密送／自動轉發（高級規則）／自動加入問候語／自動將多收件人郵件拆分為個別訊息……
📨 郵件管理：撤回郵件／依主旨等條件封鎖詐騙郵件／刪除重複郵件／高級搜尋／整合文件夾……
📁 附件專業版：批次儲存／批次解除附加／批次壓縮／自動保存／自動拆離／自動壓縮……
🌟 介面魔法：😊更多精美酷炫表情符號／重要郵件來到時提醒您／最小化 Outlook 而非關閉……
👍 一鍵奇蹟：帶附件全部答復／防釣魚郵件／🕘顯示發送者當前時間時區……
👩🏼🤝👩🏻 聯絡人與行事曆：從選取的郵件中批次新增聯絡人／將聯繫人組拆分為個別群組／移除生日提醒……
用您的慣用語言暢享 Kutools — 完整支援英文、西班牙文、德文、法文、中文等 40 多種語言！
立即一鍵解鎖 Kutools for Outlook！別再等待，馬上下載，全面提升工作效率！
🚀 一鍵下載 — 立即取得所有 Office 增益集
強烈推薦：Kutools for Office（5 合 1）
一鍵下載五個安裝程式，一次完成 — Kutools for Excel、Outlook、Word、PowerPoint 與 Office Tab Pro！立即點擊下載！
- ✅ 一鍵便利：只需一次操作，即可下載全部五個安裝套件！
- 🚀 隨時應對任何 Office 任務：按需安裝所需增益集，立即提升工作效率！
- 🧰 包含：Kutools for Excel／Kutools for Outlook／Kutools for Word／Office Tab Pro／Kutools for PowerPoint