在ms word中用vba加粗段落的一部分

西姆科夫斯基

我无法将MS WORD. 我正在逐段构建文档。在其中只有一个我只想加粗一个数字。该数字在文档中可能出现多次,但在此特定段落中应仅加粗一次。

例子:

我的第一段。

我的第二段。

我的号码是123

我使用以下代码访问段落:

Dim paragraphN As Integer
paragraphN = 3
ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range

我不知道如何仅指定此特定段落的一部分。我试过了:

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range(Start:=14, End:=17).Font.Bold = True

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range.Characters(Start:=14, End:=17).Font.Bold = True

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Characters(Start:=14, End:=17).Range.Font.Bold = True

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Characters.Range(Start:=14, End:=17).Font.Bold = True

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range(14,17).Font.Bold = True

都失败了。问题似乎很简单,但我没有想法......

胸罩

我能够使用稍微不同的方法让它工作:

   ActiveDocument.Range(ActiveDocument.Paragraphs(1).Range.Characters(5).Start, _
   ActiveDocument.Paragraphs(1).Range.Characters(10).End).Font.Bold = True

您可以使用变量调整段落编号和字符编号。

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

将matplotlib标题的一部分加粗并使用其他颜色

有什么办法可以加粗NSString的一部分吗?

如何在iOS中将字符串的一部分加粗?

如何加粗文本的一部分Android字符串

更新列MS SQL中的一部分字符串

如何使用MS SQL仅找到带括号的字符串的最后一部分

如何在MS Access VBA中将附加查询作为事务的一部分运行

将React Element的字符串值的一部分加粗

使用Microsoft.Office.Interop.Word在每行中加粗一部分字符串/范围

如何在资源字典中使文本的一部分加粗

Powershell:如何找出哪些正在运行的服务不是OS和非MS的一部分

在vuejs中仅将字符串的一部分加粗

VBA Word如何将数组的一部分传递给子例程?

使用ComboBox值作为SQL查询的一部分吗?(MS Access 2010-2013)

MS-Access-您尝试执行不包含指定表达式“ Quantity”作为聚合函数一部分的方法

Safari删除我的段落的一部分

VBA,TRIM路径的一部分

日期没有破折号和冒号ms访问+日期可以作为自动编号的一部分吗?

MS-Access:您的查询不包含指定的表达式作为聚合函数的一部分

Word VBA仅格式化查找替换字符串的一部分(格式化以字符串开头的段落)

MS-Access - 不包括 * 作为聚合函数的一部分......但它是

如何使字符串变量的一部分加粗

使段落的一部分可编辑

如何用 MS Word 粗体格式化图形标题的一部分,而另一部分是常规格式?

如何仅加粗段落的一部分?

删除 Word VBA 中的最后一部分,而不会覆盖上一个标题

在 HTML 中取消加粗标记的一部分

如何设置字符串的一部分加粗?

VBA Word 搜索一行并替换它的一部分