Option Explicit
Sub 標簽大小自適應()
Dim i As Long, j As Long
On Error Resume Next
For i = 1 To 1000 '1000行
For j = 1 To 26 'Z列
Cells(i, j).Comment.Shape.TextFrame.AutoSize = True
Next
Next
End Sub

轉載于:https://blog.51cto.com/48672/1123454

總結

以上是生活随笔為你收集整理的批量修改批注大小的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。