|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
05.07.2012, 18:20 | #1 |
Новичок
Джуниор
Регистрация: 05.07.2012
Сообщений: 2
|
Макрос на вставку строки в MS Word 10
Доброго времени суток.
Ситуация такова: Есть таблица в Ворде и нужно после каждой строки вставить еще одну строку. Было бы ничего если бы строк было бы около 20.. %) но их к сожалению 170 с лишним. Скажу честно. С VB я плохо знаком поэтому я пользовался записью макроса. Вот то что у меня получилось.. Sub Макрос3() ' ' Макрос3 Макрос ' ' Selection.InsertRowsAbove 1 Selection.Cells.Merge Selection.TypeText Text:="ЛМКЛ" Selection.SelectCell Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter Selection.Cells.VerticalAlignment = wdCellAlignVerticalTop End Sub Данный макрос просто создает нужную строку в избранном месте. Подскажите пожалуйста как проще дописать (я так понимаю цикл) в макрос. Заранее спасибо. |
05.07.2012, 22:11 | #2 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
Примерно так
Код:
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
|
06.07.2012, 11:02 | #3 |
Новичок
Джуниор
Регистрация: 05.07.2012
Сообщений: 2
|
Благодарствую
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос замены в word | Foma-78 | Microsoft Office Word | 3 | 19.06.2012 05:33 |
макрос в word | meg8639 | Microsoft Office Excel | 6 | 01.10.2011 17:37 |
Макрос в MO Word | auqarius | Помощь студентам | 0 | 11.04.2011 22:50 |
Макрос для Word | Squash | Помощь студентам | 1 | 28.03.2011 21:00 |
Макрос в Word | Mictiann | Microsoft Office Word | 1 | 12.09.2007 09:35 |