excel提取批注內容到單元格，使用excel內置命令無法完成。

excel提取批注方法一：

　　比如下圖所示A2：A9單元格區域都添加了批注，將這些批注內容提取到C2：C9單元格區域里面。比如A2單元格的批注內容是：沒有銷量，對應的C2單元格顯示的內容就是：沒有銷量。

　　excel提取批注的操作步驟如下：

　　按ATL+F11，打開VBE編輯器，單擊插入——模塊，復制粘貼下面的代碼到右邊的編輯窗口。然后回到excel工作表，在C2單元格輸入公式：=pizhu(A2)，下拉復制即可提取批注。

Public Function pizhu(i As Range)
? pizhu = i.Cells.Comment.Text
End Function

　　通過編寫上面的自定義函數來提取批注，可方便的調用，就如同使用普通公式一樣使用。

　　使用上面的這個提取批注的不完美之處在于，如果原有單元格的批注內容編輯更新后，上面的方法不會自動更新，只有雙擊重新編輯單元格公式才會更新。如果需要自動更新可以在代碼前面添加一句：Application.Volatile True?? '自定義函數自動刷新。

　　修改后代碼如下：

Public Function pizhu(i As Range)
?? Application.Volatile True?? '自定義函數自動刷新
? pizhu = i.Cells.Comment.Text
End Function

excel提取批注方法二：

　　再提供一段代碼，使用方法同上，代碼如下：

??? Function GetComment(rCell As Range)
??? Application.Volatile?? '將自定義函數標記為易失性函數
??? 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

　　返回到Excel工作表，比如要提取A2單元格的批注內容，則在C2單元格輸入公式： =GetComment(A2)即可提取批注。

　　提示：此自定義函數僅提取批注內容，而不包含批注作者。由于將自定義函數標記為易失性函數，如果A2單元格中的批注被修改，按F9鍵或當任意單元格進行計算時即可得提取到修改后的批注內容。