Verificar documento do word por vbscripting

Question

Você acha que o vba me ajudará a aprender como verificar um documento do Word pelo vbscripting? Ou eu tenho que aprender estritamente scripts de vb para documentos do Word. Meu principal problema é que eu quero começar a verificar a partir da linha 7, por exemplo, e depois sair do documento assim que terminar. Eu não quero verificar até o final do documento. Por favor, deixe-me saber como fazer isso.

Set objWord = CreateObject("Word.Application")
    objWord.Visible = True

Set objDoc = objWord.Documents.Open(strFilePath)
Set objSelection = objWord.Selection
For i =0 to 1

    objSelection.Find.Text =Date 'Today's Date
        objSelection.Find.Forward = TRUE
        objSelection.Find.MatchWholeWord = TRUE

        If objSelection.Find.Execute Then
           Call Verification(True, True,"The search string was found."&i, "")
        Else
           Call Verification(True, False,"The search string was not found.", "")
    End If
Next
objWord.Quit 0