[已解决]点有批注的单元格，批注显示不出来。

ping07

批注显示不出来，非要点编辑拉宽才行。怎么会这样呢

最佳答案

月排行榜 / 总排行榜

满满滴memory

2013-8-6 20:23

调出VBE窗口，复制黏贴以下代码后，按F5执行就OK了：
Sub 批量修改批注框大小()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
    Cmt.Parent.Comment.Shape.Width = 150
    Cmt.Parent.Comment.Shape.Height = 30
Next Cmt
End Sub

跳转到最佳答案楼层

hubinhb

你把批注的高度设成0 这肯定显示不出来了
就相当于把单元格的行高设为0 就是隐藏了...

ping07

hubinhb 发表于 2013-8-6 09:29
你把批注的高度设成0 这肯定显示不出来了
就相当于把单元格的行高设为0 就是隐藏了...

从哪调整高度了？

dongqing1998

2010版本在这里设置

zyouong

ping07

zyouong 发表于 2013-8-6 10:08

这个效果不太好，还需要一个一个点出才显示高度

满满滴memory

调出VBE窗口，复制黏贴以下代码后，按F5执行就OK了：
Sub 批量修改批注框大小()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
    Cmt.Parent.Comment.Shape.Width = 150
    Cmt.Parent.Comment.Shape.Height = 30
Next Cmt
End Sub