Word VBA教程:Text属性

Range 或 Selection对象:返回或设置指定区域或所选内容中的文本。String 类型,可读写。

Find 或 Replacement对象:返回或设置指定区域或所选内容中需要查找或替换的文本。String 类型,可读写。

说明

Text属性返回选定部分或区域的无格式纯文本。设置该属性,可替换该区域或所选内容的文本。

VBA示例

本示例显示选定区域中的文本。如果没有选中任何内容,则显示插入点之后的字符。


MsgBox Selection.Text

本示例用“Dear”替换活动文档的第一个词。


Set myRange = ActiveDocument.Words(1)
myRange.Text = "Dear "

本示例在新文档中插入 10 行文字。


Documents.Add
For i = 1 To 10
    Selection.Text = "Line" & Str(i) & Chr(13)
    Selection.MoveDown Unit:=wdParagraph, Count:=1
Next i

本示例用“Goodbye”替换活动文档中的“Hello”。


Set myRange = ActiveDocument.Content
With myRange.Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Text = "Hello"
    .Replacement.Text = "Goodbye"
    .Execute Replace:=wdReplaceAll
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号