Excel VBA(22) – 批量提取批注内容

很多人看到 VBA 都会有点怵,都误以为会很难。其实未必,比如今天我要教大家的用 VBA 批量提取单

很多人看到 VBA 都会有点怵,都误以为会很难。其实未必,比如今天我要教大家的用 VBA 批量提取单元格的批注内容。

如果表格内有大量单元格带有批注,而这些批注又需要用于分析的话,如果全靠复制粘贴,这日子快没法过了。

幸好有 VBA,您甚至不需要理解、调试,因为这几句代码非常简单,直接复制粘贴过来用就行了。

案例:

下图中的红色小箭头都是批注,如何将批注文本批量提取到 D 列?

解决方案 :

我们先把鼠标移到任意一个红色小箭头上,查看一下,确实有批注。

1. 按 Alt+F11 打开 VBE,输入以下代码:目的是自定义函数 cmt,这个函数的作用就是提取批注文本

Function cmt(X As Range)

Application.Volatile True '自定义函数自动刷新

cmt = X.Cells.Comment.Text '提取批注文本

End Function

2. 保存后退出 VBE,回到 Excel。在 D2 单元格输入以下公式:

=cmt(C2)

3. 回车后即已提出 C2 单元格的批注

4. 向下拖动复制公式,所有单元格的批注文本就能快速提取在 D 列

打开APP阅读更多精彩内容