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

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

每次发表评论都要调整框的大小,真是令人沮丧。有人知道快捷方式吗,或者可以提供一些线索,让我可以编写这个脚本吗?

答案1

我使用这个 VBA 宏在必要时批量调整注释大小。据我所知,您无法更改注释框的默认大小。

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

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

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

在此处输入图片描述在此处输入图片描述

相关内容