DOMINANT
Новичок
- Сообщения
- 42
- Репутация
- 0
Приветствую! Помогите конвертировать VBA макрос в Autoit, код ищет текст в документе и выделяет этот текст. В самом Word если запускать все работает отлично
Вот так пытался не работает
Код:
Sub Test1()
Dim WordApp As Object
Set WordApp = GetObject(, "Word.Application")
WordApp.Visible = True
ActiveDocument.Content.Select
With Selection.Find
.ClearFormatting
.Text = "12345"
End With
If Selection.Find.Execute Then
Selection.Select
End If
End Sub
Вот так пытался не работает
Код:
$objWord = _Word_Create()
$empWord = _Word_DocOpen($objWord, @ScriptDir & "\тест.docx", 0, 0, 0, 1)
$empWord.Content.Select
With $empWord.Selection.Find
.ClearFormatting
.Text = "12345"
EndWith
If $empWord.Selection.Find.Execute Then
$empWord.Selection.Select
EndIf