前言：
当前大家对“斜体加粗字体”大概比较讲究，小伙伴们都需要知道一些“斜体加粗字体”的相关知识。那么小编同时在网上网罗了一些关于“斜体加粗字体””的相关文章，希望咱们能喜欢，我们一起来学习一下吧！之前介绍过提取word文件内容的vba实例（见文末），其实对于word中加粗的文字这类涉及到文字格式的内容，一样也可以想办法进行提取，今天就来分享这样一个实例，简化如下图：
这个word文档里面有三段文字是加粗的（实际的word中可能有几十段加粗文字），需要把这些加粗的文字提取出来，保存到Excel表当中。
看过之前关于vba提取word内容的文章的朋友们应该有印象，这次的需求最核心问题就是如何判断段落是加粗的？
只要能够判断是加粗的，那么就可以通过相应的赋值或者复制语句将内容提取过来。
在VBA中，可以通过下面的语句来进行判断识别，Bold就表示加粗的意思。
Set WordD = .Documents.Open(filename)'打开文档If WordD.Paragraphs.Range.Font.Bold = -1'判断加粗
效果：
除了加粗，文字倾斜、下划线也同样可以判断识别。
If WordD.Paragraphs.Range.Font.Italic= -1'判断斜体If WordD.Paragraphs.Range.Font.Underline= wdUnderlineSingle'判断下划线
大家可以自己试一下，感兴趣的联系我获取vba代码文件
以上就是关于这个实例的演示，如果觉得实用，分享给更多的朋友吧~~~
相关阅读：
Excel VBA 实例（26） – 一键批量提取word文字内容
Excel VBA 实例（23） - 一键批量提取word表格内容
欢迎交流！
版权声明：
本站文章均来自互联网搜集，如有侵犯您的权益，请联系我们删除，谢谢。
