Всем привет, не откажите пожалуйста в помощи, как адаптировать макрос VBA, который добавляет простенькую таблицу в документ Word. Как его вставить и как адаптировать, чтобы Autoit его понял. Не пинайте сильно ногами, очень прошу :'(
Не могу никак сообразить, а тема интересная и вдруг пригодится (а она может мне пригодиться). Темы в поиске читал, но там слишком сложные примеры для меня, мне бы попроще, чтобы вникнуть, так я лучше понимаю. Просто если тот же самый макрос просто вставить в скрипт, то он не отрабатывает, его нужно как-то подготовить для работы. Заранее спасибо.
Вот сам макрос vba:
Не могу никак сообразить, а тема интересная и вдруг пригодится (а она может мне пригодиться). Темы в поиске читал, но там слишком сложные примеры для меня, мне бы попроще, чтобы вникнуть, так я лучше понимаю. Просто если тот же самый макрос просто вставить в скрипт, то он не отрабатывает, его нужно как-то подготовить для работы. Заранее спасибо.
Вот сам макрос vba:
Код:
Sub Таблица()
'
' Таблица Макрос
'
'
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:= _
3, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "Сетка таблицы" Then
.Style = "Сетка таблицы"
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = False
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = False
.ApplyStyleRowBands = True
.ApplyStyleColumnBands = False
End With
End Sub