今天汇总了有关批注的相关操作和大家一起分享,很实用,赶紧收藏了!
1、插入批注
插入批注,可以在【审阅】选项卡下,点击“新建批注”;也可以点击鼠标右键选择“插入批注”。
2、批量插入相同批注
选中其中一个单元格,插入批注后,复制该单元格,选中需要插入批注的所有单元格,点击鼠标右键选择“选择性粘贴”,勾选“批注”,确定。
3、批量插入不同批注
如果要批量插入不同内容的批注,需要用到VBA代码:点击【开发工具】选项卡——打开VBA窗口——粘贴VBA代码——运行程序
代码如下:
Sub 批量添加不同批注()
Dim rng As Range
Dim i As Byte
i = 2
ar = [B65536].End(3).Row
Range("B2:B" & ar).ClearComments
For Each rng In Range("B2:B" & ar)
rng.AddComment Text:=Range("C" & i).Value
i = i + 1
Next
End Sub
4、修改批注
选中需要修改的单元格,鼠标右键选择“编辑批注”,修改批注内容。
5、批量修改批注
首先修改文件扩展名,把xlsx改为rar,打开修改后的rar文件,进入文件名为“xl”的文件夹,找到“Comments1.xml”,用记事本打开该文件。按Ctrl+H组合键打开查找替换窗口,输入查找内容为入职,替换内容为转正,全部替换后关闭保存,最后把扩展名改回xlsx即可。
6、删除批注
删除批注,可以在【审阅】选项卡,点击批注命令组的“删除”,也可以点击鼠标右键选择“删除批注”。
7、批量删除批注
选中整个工作表区域,在【审阅】选项卡下,点击批注命令组的“删除”。也可以选中工作表区域后,直接点击鼠标右键选择“删除批注”。
8、批量提取批注
批量提取批注,也是利用到VBA代码:点击【开发工具】选项卡——打开VBA窗口——插入
模块——粘贴VBA代码——保存,然后在表格外空单元格出输入公式:=批注(B2)——向下填充公式,即可提取所有批注内容。
代码如下:
Public Function 批注(i As Range)
Application.Volatile True
On Error GoTo err
批注 = i.Cells.Comment.Text
Exit Function
err:
批注 = ""
End Function
品略图书馆 http://www.pinlue.com/
转载于:https://blog.51cto.com/14325182/2409188