Word-VBA:Selection.Extend在一个文档中工作,但在另一个文档中不工作

时间:2017-03-06 16:21:14

标签: vba word-vba

我在Word 2016中有以下测试宏:

Sub Test() 
Selection.Find.ClearFormatting 
With Selection.Find 
    .Text = "XE """ 
    .Replacement.Text = "" 
    .Forward = True 
    .Format = False 
    .Wrap = wdFindStop 
    .MatchCase = False 
    .MatchWholeWord = False 
    .MatchWildcards = False 
    .MatchSoundsLike = False 
    .MatchAllWordForms = False 
End With 
Selection.Find.Execute 
Selection.MoveRight unit:=wdCharacter, Count:=1 
Selection.Extend 
Selection.MoveRight unit:=wdCharacter, Count:=2 
End Sub 

当我运行它并逐步完成它(F8)时,我可以看到它正在做什么。在一个.docx文件中,我看到Selection.Extend有效,因为它选择了最后的两个字符。但是,当我在不同的.docx文件上运行完全相同的宏时,Selection.Extend不起作用。

可能会发生什么?

0 个答案:

没有答案