如题所述
步骤/方法
打开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
end
with
next
end
sub
单击工具栏绿色的“运行”按钮或直接按f5键
5
退出vba编辑器窗口,现在让我们来看一下效果图
打开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
end
with
next
end
sub
单击工具栏绿色的“运行”按钮或直接按f5键
5
退出vba编辑器窗口,现在让我们来看一下效果图
温馨提示:答案为网友推荐,仅供参考