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

Код: 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
Диапазон ячеек таблицы Word
    #39901807
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Потому что выделение получилось не квадратное, а с ячейки 2:2 по 10:2 - все ячейки.

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


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