Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VBA Дистрибутив макроса http://www.cyberforum.ru/vba/thread837856.html
Есть макрос с формой, каким способом можно перенести его на другой компьютер? Желательно что-бы получилось что-то типа дистрибутива, запускаем его и он автоматически распаковывается куда надо.
VBA Заполнить клетки [A1], [A2], [A3], . элементы последовательности
aN=3:2*aN-1*aN-1 где a1=1 и N=2,3,4,....,10
Использовать номер колонки для блока With VBA
Доброго времени суток. у меня буквально короткий вопрос. Есть переменная FindBegin за которой закреплен адрес определенной ячейки. Из этого адреса мне нужен только номер столбца, который я...
VBA Нужно удалить пустые ячейки из выбронного столбца Пожалуйста, помогите. Я только учись писать макросы. Вот написала один, а он некоректно работает. Цель: нужно удалить пустые ячейки из выбронного столбца. Мой макрос не удаляет пустые ячейки, если... http://www.cyberforum.ru/vba/thread837695.html
VBA Перенос информации из excel в word http://www.cyberforum.ru/vba/thread837643.html
Здравствуйте! Есть большая просьба - помогите))) Возможно ли с помощью Макросов VBA решить задачу по более простому и автоматизированному переносу данных из exel в word? Сначала вбиваются данные в...
Удаление строки из listbox и excel VBA
Добрый день. Не могли бы помочь в написании кода удаления строки из listboxa так,чтобы удаленное поле было удалено и в excel. вот код,он удаляет выбранные строки из listbox,но в excel все остается...
VBA Сумма ячеек после макроса
Есть диапазон ячеек (D22 : D23), есть макрос (на кнопке) который добавляет к диапазону строку. Как в ячейке указать формулу, чтоб после добавления строки она считала сумму? сам макрос: Sub...
VBA Дан массив X 1)Дан массив X=(9, 6.47, 2.39, 4, 8.917, 3.25, 8.625, 7.14, 4.123). Найти произведение его элементов, значения которых по модулю больше 5. 2) 3) 4)Ввести слово и вывести все буквы, стоящие на... http://www.cyberforum.ru/vba/thread837417.html
VBA arctg в VBA http://www.cyberforum.ru/vba/thread837393.html
помогите плиз .дело в том что arctg в vba определен от -пи/2 до пи/2. но если у меня случайный угол генерируется от 0 до 360, как мне учесть это?
VBA Как правильно применить к циклу Do until Добрый день. помогите пожалуйста скорректировать код. Хочу чтобы цикл подсчитал кол-во незакрашенных ячеек в диапазоне и остановил подсчет когда встретит ячейку желтого цвета. но видимо я что-то... http://www.cyberforum.ru/vba/thread837280.html
ViterAlex
6933 / 3876 / 1571
Регистрация: 11.02.2013
Сообщений: 8,443
Завершенные тесты: 3
15.04.2013, 01:59 0

Формирование таблиц Word

15.04.2013, 01:59. Просмотров 3187. Ответов 17
Метки (Все метки)

Ответ

Для вставки каждой строки нужно сделать отдельную процедуру и вызывать по мере надобности. В качестве параметра процедуры передавать таблицу, в которую добавляем строки.
Пример добавления трёх типовых строк, у которых различается форматирование
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub test()
    Do Until ActiveDocument.Tables(1).Rows.Count >= 15
        Call AddRow1(ActiveDocument.Tables(1))
        Call AddRow2(ActiveDocument.Tables(1))
        Call AddRow3(ActiveDocument.Tables(1))
        DoEvents
    Loop
End Sub
Sub AddRow1(ByVal ParentTable As Table)
    With ParentTable.Rows.Add()
        .Shading.BackgroundPatternColor = wdColorAqua
    End With
End Sub
Sub AddRow2(ByVal ParentTable As Table)
    With ParentTable.Rows.Add()
        .Shading.BackgroundPatternColor = wdColorBlueGray
    End With
End Sub
Sub AddRow3(ByVal ParentTable As Table)
    With ParentTable.Rows.Add()
        .Shading.BackgroundPatternColor = wdColorIndigo
    End With
End Sub


Вернуться к обсуждению:
Формирование таблиц Word
1
StackOverflow
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.04.2013, 01:59

Автоматическое формирование содержания для нескольких Word документов
при создании макроса у меня появляется Application.Templates( _ ...

Форматирование таблиц в WORD
Есть форматирование таблиц в Word, не знаю как избавится от ошибки 5991 "отсутствует доступ к...

Парсинг таблиц WORD
В общем, написал алгоритм перебора ячеек Cell. Вроде, все хорошо. Однако, проблема с...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru