·
1 years ago
Ich habe eine Frage zu dem VBA. Ist es auch möglich dort einen Sverweis zu integrieren? Wenn ja, wie?
在單元格中插入註釋也許可以幫助您明確地描述某些內容,但是當註釋單元格應用公式時,您是否曾經嘗試過將公式結果插入註釋中,如下圖所示? 在Excel中,除了手動將公式結果輸入註釋中,沒有內置函數可以解決該問題。 但是在這裡,我介紹一些有趣的技巧,可以幫您一個忙。
這是一個VBA代碼,可以幫助您快速插入帶有活動單元格公式結果的註釋。
1。 按 Alt + F11鍵 打開鑰匙 Microsoft Visual Basic for Applications 窗口。
2。 點擊 插入 > 模塊,然後將以下代碼粘貼到“模塊”腳本中。
VBA:插入帶公式結果的註釋
Sub ValueToComment() 'Updateby20160711Extendoffice Dim xRg As Range Dim xTxt As String Dim xCell As Range On Error Resume Next If ActiveWindow.RangeSelection.Count > 1 Then xTxt = ActiveWindow.RangeSelection.AddressLocal Else xTxt = ActiveSheet.UsedRange.AddressLocal End If Set xRg = Application.InputBox("Select cells you want to insert comment with formula result:", "Kutools for Excel", xTxt, , , , , 8) If xRg Is Nothing Then Exit Sub On Error Resume Next Application.ScreenUpdating = False For Each xCell In xRg If xCell.HasFormula Then xCell.Comment.Delete xCell.AddComment CStr(xCell.Value) End If Next Application.ScreenUpdating = True End Sub
3。 按 F5 鍵以運行代碼,會彈出一個對話框,提醒您選擇要在其公式結果中插入註釋的單元格。 看截圖:
4。 點擊 OK,並使用相應公式的顯示結果創建註釋。
要插入公式結果以註釋,您可以將Kutools for Excel的“轉換註釋和單元格”實用程序直接插入到註釋中。
30後 免費安裝 Kutools for Excel,請執行以下操作:
1.選擇要插入公式結果作為註釋的公式單元格,然後單擊 Kutools > 更多 > 轉換評論和單元格。 看截圖:
2.在提示對話框中,選中將單元格內容插入註釋選項,請參見屏幕截圖:
3。 點擊 Ok。 您會看到所有單元格內容都已插入到相應的註釋中。 看截圖: