用宏很快解决。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:
Sub test()
Dim cMt As Comment
For Each cMt In ActiveSheet.Comments
cMt.Shape.Height = 20 '如果还是不够,再自己试着改大这个数
Next
End Sub
在此界面直接按F5运行此宏,完成。
表格内容有变化 或是不是数值格式 你鼠标移到单元格边上当出现黄色叹号的时候点下 转化为数值
你可以右键在批注的单元格,设置显示批注,然后看看