如何更改评论框的默认大小

Dar*_*tos 5 microsoft-excel-2007 microsoft-excel-2011

每次我发表评论时调整框的大小都令人非常沮丧。任何人都知道快捷方式,或者可以提供线索以便我可以编写脚本?

nix*_*xda 2

我使用此 VBA 宏在必要时大规模调整注释大小。据我所知,您无法更改评论框的默认大小。

\n\n

我玩的是Worksheet_SelectionChange事件来自动触发调整大小宏,但是当涉及到排序/移动大范围时,这是一个糟糕的主意。

\n\n
Sub AutoFitComments()\n    Application.ScreenUpdating = False\n    For Each MyComment In ActiveSheet.Comments\n        With MyComment\n            .Shape.TextFrame.AutoSize = True\n            .Shape.Top = .Parent.Top + 3\n            .Shape.Left = .Parent.Offset(0, 1).Left + 3\n            .Shape.Placement = xlMove\n        End With\n    Next\n    Application.ScreenUpdating = True\nEnd Sub\n
Run Code Online (Sandbox Code Playgroud)\n\n

将代码插入工作簿的 VBA 编辑器中。按Alt+ F8\xc2\xbb\nEnter快速运行宏。

\n\n

在此输入图像描述在此输入图像描述

\n