如何在excell里批量添加批注

anmoting

领导要求把原先单列的文本备注信息做成批注形式
请教高手，是否有批量把文本单元格转换成批注格式的方法。

ps：选择性粘贴是不可行的，因为几乎每个文本备注信息都不同。

LangQueS

给个参考先：

Sub 用B列内容为A列有数据连续单元添加批注()
    For i = 1 To Cells(1, 1).End(xlDown).Row
        Cells(i, 1).AddComment
        Cells(i, 1).Comment.Visible = False
        m = Cells(i, 2).Value
        Cells(i, 1).Comment.Text Text:="" & m
    Next
End Sub




建议楼主压缩上传Excel问题附件并加以说明或做出模拟结果，以便大家了解、测试和解答。(编辑已发贴即可补充上传附件)
   
如何发表新话题和上传附件：http://club.excelhome.net/thread-45649-1-1.html
发帖的技巧：http://club.excelhome.net/thread-176339-1-1.html
EH技术论坛的最佳学习方法：http://club.excelhome.net/thread-117862-1-1.html

谭Andy

先看看，学习一下