如何将光标移动到我想要的办公室字符的位置?

时间:2016-04-20 08:11:41

标签: vba word-vba

  

12345qwesdfasdf22232& 021930

与上面的字符串一样,我想通过搜索字符串中的字符将光标移动到字符&之后的位置。当我使用visual basic来控制单词时,我怎样才能实现它?

Option Explicit

Dim WordApp As Word.Application   

Private Sub Command2_Click()
    Set WordApp = New Word.Application

    WordApp.Documents.Open CommonDialog1.FileName     
    WordApp.Visible = True 
    WordApp.DisplayAlerts = False
    ...
End Sub

1 个答案:

答案 0 :(得分:0)

如果使用Selection.TypeText输出,则可以使用

Selection.MoveStartUntil "&", wdBackward
Selection.MoveLeft 1

将向后移动,直到第一次出现&符号。

您也可以像Cindy Meister所提到的那样做Selection.Find类似于......

With Selection.Find
    .MatchWildCards = false
    .Text = "&"
    .Execute
End With