向各老师请教,我想将A1单元格的批注,宽度设为200,高度自动适合文本内容.
先谢过各位老师了!
For Each c In ActiveSheet.Comments
c.Shape.Width = 200
c.Shape.TextFrame.AutoSize = True
Next c
参考:
http://club.excelhome.net/thread-777329-1-1.html
http://club.excelhome.net/forum.php?mod=viewthread&tid=86471&page=3#pid5541310