Word как заполнить таблицу в цикле? #281553

Люди плиз. Как заполнить таблицу Word в цикле?

Народ че никто не знает, как это сделать?

В ворде нажми "записать макрос", сделай необходимые тебе заполнения, останови запись и посмотри что там записалось. Затем оберни всё в цикл.

А таблица должна быть фиксированной длины, или ее можно заполнять сколь душе угодно

По идее второе но у меня нет примера см

Я смотрю что это пойдет для Excele,  а Ворде куда пихать мои значения он не понимает

как запустить этот макрос из 1С приэтом использую шаблоны?

$5

к этой строке что вначале надо написать?? Таб или Документ

еще ругается на Selection че делать?

можно ли сделать таблицу в таблице?

материт на чем свет стоит WordApp.DisplayAlerts    = xlFalse<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlFalse) Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (wdAlignParagraphCenter) Таб.Columns.PreferredWidthType    = wdPreferredWidthPoints<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (wdPreferredWidthPoints) Таб.ApplyStyleHeadingRows    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.ApplyStyleLastRow        = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.ApplyStyleFirstColumn    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.ApplyStyleLastColumn    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.Cell(1, 1).Range.Font.Bold    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.Cell(1, 2).Range.Font.Bold    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.Cell(1, 3).Range.Font.Bold    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) Таб.Cell(1, 4).Range.Font.Bold    = xlTrue<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (xlTrue) При проверке модуля обнаружены синтаксические ошибки!

хорошо а с этим как быть? Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (wdAlignParagraphCenter) Таб.Columns.PreferredWidthType    = wdPreferredWidthPoints<<?>>; {Z:1C общаяФирмыЛэнгвичЛинкВыгрузка в Банк word.ert}: Переменная не определена (wdPreferredWidthPoints) При проверке модуля обнаружены синтаксические ошибки!

wdPreferredWidthPoints = 3

wdAlignParagraphCenter = 1

попробую спасибо

С VBA совсем не дружишь?

Кстати "Выгрузка в Банк word.ert" что-то мне смутно напоминает. В какой банк выгружаешь?

Спасибо ребят я решил эту проблему, через шаблоны и макросы в Word. Если кому чего скинуть могу.

Отдельное спасибо хочу выразить  "dk"