Excel批量提取批注与删除批注
2020/09/27 05:30
问题情境
如下样表：
A列很多项目都已批注的形式注明了完成情况，现需要将完成情况的批注内容提取到B列备注中。
韩老师给大家讲一种自定义函数提取批注的方法。
实现过程
1、<Alt+F11>，打开VBA窗口，插入模块：
2、在模块中输入以下代码：
Function pz(rng As Range)
Application.Volatile
On Error GoTo err
pz = rng.Comment.Text
Exit Function
err:
pz = ""
End Function
即可实现自定义函数pz，可以提取批注。
3、保存为启用宏的工作簿，在B2单元格输入公式=pz(A2)，确定，公式向下填充，即可批量提取批注。
保存与使用过程如下动图：
批量删除批注
如果大量数据中，存在不规律分布的批注，可用【查找】-【批注】功能定位到有批注的单元格，右键删除批注。
如下动图：
