今天跟大家分享关于批注的提取与添加 批量处理的方法,相信这个方法能给大家工作提供有益参考。
需求:
有位小伙伴提示这样的一个工作需求:我有一列数据都加上了批注,内容是日期。需要对批注的内容也就是日期进行排序。
解决思路:
在当前带有批注的列前插入一个辅助列。将批注的内容提取出来对应的填入辅助列中,然后对辅助列进行排序。
批注的批量提取方法:
以上图案例为例:将G列单元格的批注内容 ,提取到F列对应的单元格中。仅需几行代码即可实现:
按alt+f11 打开代码编号器,输入如下图所示代码:
Sub Comment_ex()
For i = 1 To 10
aa = Range("G" & i).Comment.Text ' 批注所在的G列。
Range("f" & i) = aa '辅助列F,用于存放批注内容。
Next
End Sub
按F5运行即可完成提取。
写到这,小编想到,要是反过来呢?如果你需要把 F列单元格的内容作为G列的批注添加到G列呢?
因为日常工作中如果手动大量的添加批量是很麻烦的事情。比如我们要将备注列单元格的内容添加到品名列作为批注。
好的,我们依然以上面的例子做下反向操作,来说明如何批量添加批注。
批注的批量添加方法:
依然是按alt+f11 打开代码编号器,输入如下图所示代码:
Sub Comment_add()
For i = 1 To 10
aa = Range("f" & i) '辅助列F,用于存放批注内容。
Range("G" & i).AddComment
Range("G" & i).Comment.Text Text:="" & aa ' 将F列的内容添加到G列
Next
End Sub
按F5运行即可完成批注的批量添加。
这样我们关于批注的批量提取、批量添加就都跟大家讲明白了。
今天就跟大家分享到这了,如果大家喜欢我分享的内容请收藏、转发、点赞,关注我的公众号excel应用与开发 。
请点击并长按下方二维码关注吧!