如何统一设定excel批注的字体格式
表格中经常需要插入批注,公司要求所有文件字体都是华文细黑。可是插入的批注字体是宋体,需要一个个改,很麻烦。有没有方法可以设置当插入批注时自动就是华文细黑呢?谢谢...
表格中经常需要插入批注,公司要求所有文件字体都是华文细黑。可是插入的批注字体是宋体,需要一个个改,很麻烦。有没有方法可以设置当插入批注时自动就是华文细黑呢?谢谢
展开
6个回答
博思aippt
2024-07-20 广告
2024-07-20 广告
作为深圳市博思云创科技有限公司的工作人员,对于Word文档生成PPT的操作,我们有以下建议:1. 使用另存为功能:在Word中编辑完文档后,点击文件->另存为,选择PowerPoint演示文稿(*.pptx)格式,即可将文档内容转换为PPT...
点击进入详情页
本回答由博思aippt提供
展开全部
1、打开Excel工作簿文档,按下ALT+F11组合键调用出VBA编辑器。
2、单击菜单栏上的“插入”,打开的菜单单击“模块”命令。
3、将下面的代码复制到模块框中
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
4、单击工具栏绿色的“运行”按钮或直接按F5键。
5、退出VBA编辑器窗口,现在来看一下效果图。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
alt + fll进入VBA编辑器。输入以下代码,执行
------------------------------------------------------------------------------------------
Sub CommentFont()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
With Cmt.Shape.TextFrame.Characters.Font
.Bold = msoFalse
.ColorIndex = 0
.Name = "华文细黑"
.Underline = 1
.Size = 9
End With
Next
End Sub
---------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------
Sub CommentFont()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
With Cmt.Shape.TextFrame.Characters.Font
.Bold = msoFalse
.ColorIndex = 0
.Name = "华文细黑"
.Underline = 1
.Size = 9
End With
Next
End Sub
---------------------------------------------------------------------------------------------
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以试试07版EXCEL按钮-EXCEL选项-常用-将字体改成需要的-确定
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
点编辑批注,在设置批注格式中可以选择字体。
追问
这个只是修改的单个的批注格式,批注太多了,不想一个个的改
追答
这个有点麻烦,先把单元格设置成同样的批注格式,再填写单元格内容和批注内容,方法是选中一个单元格,点插入批注后,在开始选项中设置字体,然后输入一个空格,再复制该单元格在要同样批注格式的位置粘贴。最后才填入单元格内容和该单元格的批注内容。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询