如何在 Excel 註釋中插入公式結果？

---

本文將指導使用者如何在 Excel 註釋中插入公式結果。文章介紹了兩種實現相同任務的不同方法。第一個示例允許使用者使用 VBA 程式碼，在 Excel 中將公式結果顯示為註釋。之後，下一個任務允許使用者使用 Kutools 工具在 Excel 表格中將結果插入為註釋。所有提供的步驟都清晰明瞭。所有步驟中提供的詳細資訊都詳細而全面。

示例 1：使用 VBA 程式碼在 Excel 中將公式結果插入為註釋。

步驟 1

為了理解在 Excel 表格中將公式結果插入為註釋的過程，請考慮一個 Excel 電子表格。此電子表格包含幾個列，例如員工程式碼、工資、獎金和總計。需要注意的是，總計列的值儲存了工資和獎金值的總和。下面提供了 Excel 表格的快照

步驟 2

在這裡，使用者將使用 VBA 程式碼執行任務。為此，使用者需要開啟 VBA 編輯器。為此，請右鍵單擊工作表選項卡。這將顯示一個選項列表，在提供的選項列表中選擇“**檢視程式碼**”選項。下面提供了相同的快照

步驟 3

另一個對話方塊“**Microsoft Visual Basic for Applications**”將開啟。此對話方塊顯示一個大的空程式碼區域。下面提供了相同的快照

步驟 4

Copy the below provided code to editor:
'define module
Sub add_comment_to_formula()
    'declare required variable
    Dim range_x As Range
    Dim text_x As String
    Dim cell_x As Range
    On Error Resume Next
    'if salary
    If ActiveWindow.RangeSelection.Count > 1 Then
      ' setting variables
      text_x = ActiveWindow.RangeSelection.AddressLocal
    'else statement
    Else
      ' setting variables
      text_x = ActiveSheet.UsedRange.AddressLocal
    ' end of if block
    End If
    ' setting range variable
    Set range_x = Application.InputBox("Set the certain cell:", "Formula result", text_x, , , , , 8)
    ' if range is nothing
    If range_x Is Nothing Then Exit Sub
    ' on error resume next
    On Error Resume Next
    Application.ScreenUpdating = False
    ' for each loop
    For Each cell_x In range_x
        ' if cell has formula
        If cell_x.HasFormula Then
            'calling delete
            cell_x.Comment.Delete
            ' calling add comment
            cell_x.AddComment CStr(cell_x.Value)
        'end of if statement
        End If
    ' next statement
    Next
    ' screen update to true
    Application.ScreenUpdating = True
End Sub

在將上述程式碼鍵入或貼上到程式碼區域後，單擊“執行”按鈕。下面提供了相同的快照

步驟 5

執行選項將顯示“Kutools for Excel”對話方塊。在輸入區域中，選擇行，然後單擊“**確定**”按鈕。

步驟 6

上述步驟將在總計列中添加註釋。此列包含儲存求和資料的註釋。下面提供了相同的快照

示例 2：使用 Kutools 工具在 Excel 中將公式結果插入到註釋中。

步驟 1

對於此示例，將使用相同的 Excel 表格。下面提供了相同的快照

步驟 2

之後，轉到“**Kutools**”選項卡，然後轉到“編輯”選項卡，然後選擇“**更多**”磁貼，然後進一步選擇選項“**轉換註釋和單元格…**”。為了便於參考，請考慮以下提供的示例資料

步驟 3

上述步驟將開啟“**轉換註釋和單元格**”對話方塊。此對話方塊允許使用者在“源區域”標籤中選擇資料範圍，然後在“轉換”標籤下選擇第二個選項“**將單元格內容插入到註釋中**”，最後單擊“**確定**”按鈕。

步驟 4

上述步驟將再次在總計列中添加註釋標籤。下面提供了相同的快照

結論

本文指導使用者完成將公式生成的計算結果作為註釋插入最後一列的過程。本文中描述了兩個示例。使用者必須在 VBA 程式碼中編寫正確的語法、宣告和語句才能獲得所需的結果。所有提供的步驟都詳細而全面。