如何將 Excel 註釋匯出到 Word？

Excel 中的註釋是一個強大的工具，可以為特定單元格新增附加資訊、解釋或提醒。但是，在某些情況下，您可能希望在 Excel 之外（例如在 Word 文件中）共享或呈現此資訊。在本教程中，我們將指導您完成將註釋從 Excel 匯出到 Word 的過程，使您可以無縫地傳輸資料及其附帶的註釋。無論您需要建立報告、文件還是任何其他形式的書面溝通，本教程都將為您提供輕鬆地將註釋從 Excel 匯出到 Word 的必要步驟。讓我們開始吧！

將註釋從 Excel 匯出到 Word

在這裡，我們將首先建立一個 VBA 模組，然後執行它來完成任務。讓我們看看一個簡單的過程來學習如何將註釋從 Excel 匯出到 Word。

步驟 1

考慮一個包含註釋的 Excel 表格。

首先，右鍵單擊工作表名稱，然後選擇“檢視程式碼”以開啟 VBA 應用程式。

右鍵單擊 > 檢視程式碼。

步驟 2

然後單擊“插入”，然後選擇“模組”。然後將下面的程式碼複製到文字框中。

插入 > 模組 > 複製。

程式碼

Sub CopyCommentsToWord()
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
   Err.Clear
   Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
   wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
   wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub