Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объединение ячеек в ворд, с помощью макроса / 6 сообщений из 6, страница 1 из 1
25.10.2012, 11:35
    #38012618
ольга060289
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объединение ячеек в ворд, с помощью макроса
Доброго времени суток!
Есть задача: в документе ворд - таблица. В таблице необходимо объединить 3 последних столбца. Всего в таблице 5 столбов.
Помогите, пожалуйста, осуществить это с помощью макроса.
...
Рейтинг: 0 / 0
25.10.2012, 11:59
    #38012675
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объединение ячеек в ворд, с помощью макроса
Сервис - Макрос - Начать запись
проделать все, что нужно, остановить запись, макрос готов
...
Рейтинг: 0 / 0
25.10.2012, 13:21
    #38012930
ольга060289
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объединение ячеек в ворд, с помощью макроса
Дело в том, что документ будет постоянно изменяться, поэтому макрос не подойдет для измененного документа. Запись макроса происходит с помощью Selection, и именно это мне не подходит
...
Рейтинг: 0 / 0
25.10.2012, 13:25
    #38012948
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объединение ячеек в ворд, с помощью макроса
ольга060289,
Код: vbnet
1.
2.
'объединение ячеек, например Cell(2, 3), первая цифра - строка, вторая цифра - столбец, то есть ячейка строки ...
ActiveDocument.Tables(1).Cell(2, 3).Merge MergeTo:=ActiveDocument.Tables(1).Cell(2, 5)



по моему со столбцами схоже
...
Рейтинг: 0 / 0
25.10.2012, 13:29
    #38012960
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объединение ячеек в ворд, с помощью макроса
ольга060289Дело в том, что документ будет постоянно изменяться, поэтому макрос не подойдет для измененного документа. Запись макроса происходит с помощью Selection, и именно это мне не подходитНу так заменить Selection на, собственно, нужные столбцы. Что у вас получилось при записи макроса?
...
Рейтинг: 0 / 0
25.10.2012, 15:34
    #38013277
ольга060289
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объединение ячеек в ворд, с помощью макроса
Спасибо, додумалась вот до этой штуковины:

Dim Tb1 As Table
Dim Cell As Cell
Dim i As Integer

Set Tb1 = ActiveDocument.Tables(1)
For i = 1 To Tb1.Rows.Count
Set Cell = Tb1.Cell(i, 3)
Call Cell.Merge(Tb1.Cell(i, 5))
Next i
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объединение ячеек в ворд, с помощью макроса / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]