Гость
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Диапазон ячеек таблицы Word / 4 сообщений из 4, страница 1 из 1
12.12.2019, 11:55
    #39901766
deleteant
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Диапазон ячеек таблицы Word
Пытаюсь выровнять текст в ячейках диапазона:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
   Set doc = ActiveDocument
    Set tbl = doc.Tables(1)
    
     Set rng = doc.Range( _
      Start:=tbl.Columns(2).Cells(2).Range.Start, _
      End:=tbl.Columns(2).Cells(10).Range.End)
    rng.ParagraphFormat.Alignment = 1[SRC VB]



Выравнивает текст в строках как указано (с 2 по 10) , но во всех столбцах таблицы. А надо только во втором. Как добиться?
...
Рейтинг: 0 / 0
12.12.2019, 12:59
    #39901807
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Диапазон ячеек таблицы Word
Потому что выделение получилось не квадратное, а с ячейки 2:2 по 10:2 - все ячейки.

Сделай цикл по строкам
...
Рейтинг: 0 / 0
12.12.2019, 13:14
    #39901813
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Диапазон ячеек таблицы Word
Таблица в Ворде только выглядит как таблица - а на самом деле это сплошной текст с разделителями, интерпретируемыми как границы ячеек и строк при отображении. Достаточно было сделать doc.Range(...).Select, чтобы это увидеть.
...
Рейтинг: 0 / 0
12.12.2019, 13:41
    #39901830
deleteant
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Диапазон ячеек таблицы Word
Select выделяет, как задумывалось -- строки во втором столбце. С Selection все нормально отрабатывает. Хотелось его избежать. Таблица несколько тысяч строк. Думал, без Select быстрее обработает. Несколько форматов (выравнивание в ячейке, отступы, шрифт и т.п.) берутся с образцовой строки.
Спасибо, буду Select использовать.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Диапазон ячеек таблицы Word / 4 сообщений из 4, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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