我的ActiveDocument只包含TEXT。
我想删除活动文档中的所有文本,并将其设置为存储在字符串中的文本。
E.g。
Dim str as String
str = "bla bla bla . . ."
ActiveDocument.Selection.
.Find = ?? ' I dont know what to find becuase I just want to delete all the texts.
.Replace.Text = str
答案 0 :(得分:1)
只需覆盖全文,我认为这应该有效:
Dim str As String
str = "bla bla bla ..."
ActiveDocument.Range.Text = str