用下面的自定義函數(shù)可以將某個單元格中的批注提取到其他單元格中，方法如下：

1.按Alt+F11打開VBA編輯器，單擊菜單“插入→模塊”，在“工程”窗口中會看到Excel插入了一個名稱為“模塊1”的模塊。

2.在右側(cè)“模塊1”的代碼窗口中輸入下列代碼：

Function GetComment(rCell As Range)
Application.Volatile '將自定義函數(shù)標記為易失性函數(shù)
Dim Cmt As String
On Error Resume Next
Cmt = rCell.Comment.Text
GetComment = Right(Cmt, Len(Cmt) - InStr(1, Cmt, ":", vbTextCompare))
On Error GoTo 0
End Function

3.關(guān)閉VBA編輯器，返回到Excel界面。假如要提取A10單元格中的批注，則在其他單元格中輸入公式：

=GetComment(A10)

回車后即可得到A10單元格中的批注內(nèi)容，注意本自定義函數(shù)僅提取批注內(nèi)容，而不包含批注作者。由于將自定義函數(shù)標記為易失性函數(shù)，如果A10單元格中的批注被修改，按F9鍵或當任意單元格進行計算時即可得到修改后的批注內(nèi)容。