With ActiveDocument.Range.find
.Text = "Слово1"
If .Execute = True Then
.Parent.Collapse Direction:=wdCollapseEnd
.Parent.Select
End If
End With
End Sub
Данный код VBA перемещает курсор после определенного слова (в данном примере Слово1).
как этот код написать на языке 1с при работе с макетом word?
(7) чето ты рано сдался парниша, что не получилось?
ACtiveDocument - это MSWord.Application.Documents(1)? Отрабатывает?
Иск = Макет.Range.find;
Иск.Text = "Слово1"
If Иск.Execute = True Then
Иск.Parent.Collapse(,,wdCollapseEnd); // Direction:=wdCollapseEnd //Тут нужно позицию Direction в методе найти и подставить ее значение
Иск.Parent.Select
End If
Что-то типа этого навскидку
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.