如果该属性值为 True,则从指定区域获取的文本包含隐藏文字。Boolean 类型,可读写。
注意 如果不设置该属性,其默认值为“选项”对话框中“视图”选项卡上“隐藏文字”选项的当前设置(单击“工具”菜单上的“选项”可显示该对话框)。使用 Range 对象的 Text 属性可从指定区域获取文本。
expression.IncludeHiddenText
expression 必需。该表达式返回一个 TextRetrievalMode 对象。
本示例在消息框中显示活动文档中首句的文本。本示例使用 IncludeHiddenText 属性包含隐藏文字。
Dim rngTemp As Range
Set rngTemp = ActiveDocument.Sentences(1)
rngTemp.TextRetrievalMode.IncludeHiddenText = True
MsgBox rngTemp.Text
如果将全部所选内容的格式设为隐藏文字,则本示例发布一条消息。
Dim rngTemp As Range
If Selection.Type = wdSelectionNormal Then
Set rngTemp = Selection.Range
rngTemp.TextRetrievalMode.IncludeHiddenText = False
If rngTemp.Text = "" Then MsgBox "Selection is hidden"
End If