今天跟大家分享关于批注的提取与添加 批量处理的方法,相信这个方法能给大家工作提供有益参考。

需求:

有位小伙伴提示这样的一个工作需求:我有一列数据都加上了批注,内容是日期。需要对批注的内容也就是日期进行排序。

解决思路:

在当前带有批注的列前插入一个辅助列。将批注的内容提取出来对应的填入辅助列中,然后对辅助列进行排序。


批注的批量提取方法:

以上图案例为例:将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应用与开发

请点击并长按下方二维码关注吧!