Word VBA上标问题

时间:2015-10-01 14:28:42

标签: vba ms-word word-vba

我收到了一份我必须解析的word文档。我循环遍历段落对象(删除表格后)以获取格式化文本。

除了上标格式之外,大多数情况下这都运行良好。我放了一个debug.print ....跟......发现我认为奇怪的东西。

Selection.HomeKey Unit:=wdStory
For Each Para In ActiveDocument.Paragraphs
    Debug.Print Para.Range.Text
    Debug.Print Para.Range.FormattedText
Next

我的debug.print的输出如下...... .text和.formattedtext ..我删除了重复的行。

kilo (k) 10³
centi (c) 10-2
milli (m) 10-³
micro (µ) 10-6
nano (n) 10-9
pico (p) 10-12 

这是一个奇怪的部分(对我而言)。 工作的上标,第1行和第3行没有可辨别的格式,但正如您所看到的,debug.print显示所需的上标格式。

无效的行,2,4,5,6行在文档的字体属性中标记为上标。

我的问题是如何保留单词文档中出现的上标格式?我的文档中应该有上标格式的所有行在文档中都是正确的但是当我尝试读取段落时,格式化为上标的行不会持久...具有上标但不是格式的段落代码是上标。本文档是我无法联系的合同团队的产品。

可以通过以下链接下载该文件。

https://onedrive.live.com/redir?resid=C636FDD587E837CB!517&authkey=!ADjgA8mlRJqvv6U&ithint=file%2cdoc

提前感谢您的帮助。

Anthony Jaxon,洛杉矶,美国

0 个答案:

没有答案