第一个问题解决办法:
调出审阅工具栏,点【显示所有批注】按钮
第二个问题解决办法,如何调整显示框大小?
用宏,代码如下:
Sub Macro1()
For Each cmt In
ActiveSheet.Comments
With cmt
.Shape.TextFrame.AutoSize
= True
lArea =
.Shape.Width
*
.Shape.Height
.Shape.Width
= 100
.Shape.Height
= (lArea / 100) * 1.2
End With
Next
End Sub
温馨提示:答案为网友推荐,仅供参考