Excel如何批量修改批注文字格式-Excel教程

如果想要实现将Sheet1工作表中所有的批注文字批量更改为：楷体、14号、颜色为红色的效果，该怎么做呢，具体步骤如下所述：

前期准备工作（包括相关工具或所使用的原料等）

Excel 2010

详细的具体步骤或操作方法

打开Excel工作簿文档，按下ALT+F11组合键调用出VBA编辑器

单击菜单栏上的“插入”，打开的菜单单击“模块”命令

将下面的代码复制到模块框中

Sub 批量修改批注()
Dim cm As Comment
For Each cm In Sheet1.Comments 'sheet1是我们要批量修改批注的工作表，可以按需改变。
With cm.Shape.TextFrame.Characters.Font
.Name="楷体"
.Size=14
.ColorIndex=3
With
Next
Sub

单击工具栏绿色的“运行”按钮或直接按F5键

退出VBA编辑器窗口，现在让我们来看一下效果图

Excel批量修改批注框大小，统一尺寸

实现这个效果的方法跟上面的步骤是一样的，只需把上面的代码更改成下面的代码即可，当中的“Width=200”，这个数值可自行更改成想要的批注框宽度

Sub 批量修改批注框大小()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
Cmt.Parent.Comment.Shape.Width=200
Next Cmt
Sub

单击“运行”按钮，再一次让我们来看一下效果效果图

这是宽度为500的效果图

经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。作者声明：本文系本人依照真实经历原创，未经许可，谢绝转载。