如何全部修改EXCEL批注框格式大小，一个一个的去修改的话很麻烦的

270223745 · 发表于 2012-5-21 16:38

shuyee · 发表于 2012-5-22 18:19

自己改吧
Sub changeComm()
For i% = 1 To ActiveSheet.Comments.Count
With ActiveSheet.Comments(i%).Shape
.Width = 60
.Height = 100
End With
Next
End Sub

shuyee · 发表于 2012-7-9 18:40

是啊。你也可以设定135大，246小，之类的。如果更进一步，可以获取批注内容，计算各个批注自己的大小

ATN · 发表于 2012-7-8 16:16

shuyee 发表于 2012-5-22 18:19
自己改吧
Sub changeComm()
For i% = 1 To ActiveSheet.Comments.Count

这个代码的意思是固定高度、宽度？？

二月十六 · 发表于 2012-9-21 10:54

非常感谢2楼，问题解决了。学习啊

xinfeiwyh · 发表于 2013-3-22 10:03

这段代码要输入到哪呢？

		自动登录	找回密码
密码			免费注册

[求助] 如何全部修改EXCEL批注框格式大小，一个一个的去修改的话很麻烦的