Word VBA-标题设置

==========================

'^第[一二三四五六]章、(.)*
Sub Word使用正则表达式批量设置标题样式()                                         '创建正则表达式对象Dim objRegExp As Object'创建word对象Dim docDocument As DocumentDim i As IntegerDim k As String, nPt As String, sty As StringnPt = InputBox("请输入需要匹配的正则表达式")Set objRegExp = CreateObject("vbscript.regexp")With objRegExp'正则表达式匹配文本类型.Pattern = nPt'设置仅匹配第一个或是匹配所有符合条件的内容.Global = True.MultiLine = False.IgnoreCase = FalseEnd Withsty = InputBox("请输入样式名称")Set docDocument = ActiveDocumentFor i = 1 To docDocument.Paragraphs.Countk = docDocument.Paragraphs(i).Range.TextIf objRegExp.test(k) ThendocDocument.Paragraphs(i).Range.SelectWith Selection'如果匹配到符合条件的标题，则将其样式设置为sty(注：sty为Word中的样式名称，需在程序运行前预先定义好).Style = ActiveDocument.Styles(sty)End WithEnd IfNextEnd Sub

==========================

Word VBA-标题设置相关推荐

Word 为标题设置段前段后间距设置与异常
Word 为标题设置段前段后间距设置与异常参考文章: (1)Word 为标题设置段前段后间距设置与异常 (2)https://www.cnblogs.com/neillee/p/7001891.ht ...
word 2013 标题设置多级列表
1.问题要设置标题为多级列表,批量应用 2.解决 1选标题1 2选标题2 ...以此类推.点确定保存即可转载于:https://www.cnblogs.com/wdw31210/p/1072369 ...
html实现艺术字体颜色,Word中将标题设置为艺术字，式样为艺术字库中的填充-红色，强调文字颜色2，粗糙棱台，...
回答: 上图上为了比较突出效果而特地设置.如是使用一排横字的效果没有如此明显.下面介绍设置步骤:本例使用Word 2013版本操作一.插入,文本,艺术字,点选第二排最右侧的"填充-橄榄色, ...
Word多级标题设置，一级标题是汉字数字，其他级别是阿拉伯数字
1.分别设计各个标题格式 2.创建多级列表,此时会这样 3.在需要用到的标题级别下将"正规形式编号"勾上
用ptyhon和vba清除Word的标题样式保留字体格式，生成标题目录。
不同格式的word文档合并为一个文件. 问题: 文件汇编,需要将70多个文件汇编成一个到一个文件里.最终汇编的方式是用word--插入--对象--文件中的文字. 但是由于原始文件有的设置了自动编号.插 ...
Word如何快速设置多级标题并生成目录
word2016如何设置多级标题及自动生成目录快速设置多级标题自动生成目录相信不少朋友都在写论文或报告的时候对设置多级标题以及自动生成目录很苦恼,其实只要对标题设置了级别就可以快速生成目录了也 ...
Word中将一级标题设置为段前一行与段后一行时，不显示段前一行怎么办？
Word中将一级标题设置为段前一行与段后一行时,不显示段前一行怎么办? 把一级标题所在页称为当前页. 2.把光标定位在上一页的最后一行. 3.点击"布局"--"分隔符&q ...
word中的标记、分页、批量标题设置、多级列表设置
一.word标记 1.在word中会有各种各样的标记: (1)→:制表符,使用Tab键可以输出: (2)↓:手动换行符,又叫软回车,使用Shift+Enter可以输出: 注意:软回车文字换行,但不分段 ...
word中的标题设置了段前30磅但是在每一页的最上边的标题显示的时候却显示不出来段前间距：
word中的标题设置了段前30磅但是在每一页的最上边的标题显示的时候却显示不出来段前间距: 这个原因是分页符或者隔页符原因. 解决方法:在上一页最后插入分页符(word2016中 :布局--分 ...
word中怎么设置标题大纲级别
1 目标新建一个word,能够提前设定好word的标题.正文格式,等到自己编辑文本的时候能够直接选中预先设置好的格式,直接修改. 2 解决办法新建word文档. 在样式中选中标题1,右击修改,进入 ...

Word VBA-标题设置

Word VBA-标题设置相关推荐

最新文章

热门文章