2 mozhe1 mozhe1 于 2016.09.14 20:27 提问

如何利用word vba修改文档中数字的字体

如何利用word vba修改文档中全部数字的字体,求详细代码,只修改数字字体。

1个回答

caozhy
caozhy   Ds   Rxr 2016.09.14 23:36

数字的字体不能单独修改,但是如果是所有英文/数字的字体,是可以修改的。

mozhe1
mozhe1 英文数字要怎么修改啊,我这文档是汉字加数字的。
接近 2 年之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!
其他相关推荐
如何一次改变word中的数字和字母的字体属性
在编辑word文档时,一般中文字体和数字、英文字母的字体是不一样的,中文字体可以是宋体等,数字、英文一般会设置成 Times New Roman等。在处理中英文混排的文档时,这些格式如何一次完成设置呢?
2017.3.1word中如何改变所有的英文字母和数字的字体
Word统一设置英文和数字字体
vba 操作Word-更新word内容
Dim docPath As String    Dim wordApp As New Word.Application    Dim wordDoc As New Word.Document    Private Sub CmdSelectDic_Click() Unload MeEnd SubPrivate Sub List_file(oPath As String)         
Word中统一修改数字和字母
方法一: 全选,设置成宋体 然后在全选,设置成Time New Roman 因为Time New Roman不支持汉字,所以不会修改汉字的字体 方法二: 单独修改字母: Ctrl+H——查找内容,输入:^$ 替换为,点“高级”——格式——字体(或段落等根据你的需要,举例)——颜色——红色——确定——全部替换——就变成红色的了。 单独修改数字: 查找内容,输入:^# 其他操作同上。
VBA实现批量修改Word文档的页脚内容
功能示例: 有很多个doc文档,页脚的电话变了,如原电话是4007339339,现在变成4007168339了,要实现批量替换,可使用此程序。 使用说明: 1、 复制下面程序代码到VBA里后,点“工具”-“宏”-“宏”-“change”-“运行” 2、 输入目录(不要输入根目录,要不速度会很慢) 3、 输入要查找的内容 4、 输入的替换成你要的内容 -----------------
word vba批量替换文件内容并批量修改文件名
最近在工作中遇到某一文件夹下的许多文件,名字和内容有大量需要替换,一个个手工替换很麻烦,于是修改了一段代码: Sub 批量更改word要素编号及文件名() '此代码为指定文件夹中所有选取的WORD文件的进行格式设置 Dim MyDialog As FileDialog, vrtSelectedItem As Variant, Doc As Document Dim NewName As Stri
VBA word中插入文字和艺术字
1. 如何插入文字在当前光标处(活动文档末尾)插入文字Sub InsertTextAtEndOfDocument() ActiveDocument.Content.InsertAfter Text:=" The end." End Sub在所选内容前插入文字:Sub AddTextBeforeSelection() Selection.InsertBefore Text:="new
word VBA邮件合并及批量生成单个文档
数据源为excel,word中建立表模板,利用邮件合并功能实现批量填表,利用VBA技术将填表结果分成独立的文档
使用WORD宏实现查找带格式的文字并复制到特定地方
原来的WORD文档内容是这样的: 1、硬盘出厂后必须经过格式化才能使用。 2、显示器是由监视器与显示适配卡两部分组成的。 ....... 内容类似于带考试试卷上答案的填空题。目前的需求是把答案部分留空,并设置下画线,然后把答案列到后面以括号括起来,最终结果为这样: 1、硬盘出厂后必须经过____才能使用。(格式化) 2、显示器是由____与____两部分组成的。(监视器
使用VBA提取文件夹内所有word文档中的表格数据
使用VBA提取文件夹内所有word文档中的表格数据