excel里的批注标识点编辑的时候总是显示到很远的地方,怎么可以让批注显示在单元格边上?

2024-12-23 20:38:45
推荐回答(1个)
回答(1):

用VBA,按下 ALT+F11 进入VBA编辑器,新建一模块,将下列代码复制到模块中: Sub 设置批注() '设置当前活动工作表中所有批注的位置和大小 Dim Cmt As Comment Dim HW As DoubleHW = 0.6 For Each Cmt In ActiveSheet.Comments Cmt.Shape.Left = Cmt.Parent.Left + Cmt.Parent.Width + 11.25 If Cmt.Parent.Row = 1 Then Cmt.Shape.Top = Cmt.Parent.Top + 1.5 ElseCmt.Shape.Top = Cmt.Parent.Top - 7.5 End IfCmt.Shape.TextFrame.AutoSize = True Cmt.Shape.Width = Cmt.Shape.Height + 10 / HWNextEnd Sub切换到 Excel ,按 ALT+F8 运行上面的宏即可。注:如果要改变批注框的大小,只需要改动代码中红色数值即可