Таблица в Word - VB

Узнай цену своей работы

Формулировка задачи:

1.

Есть Word с таблицей, таблица не стабильная (некоторые ячейки объединены)
Как устроить цикл, чтобы не нарываться на несуществующие ячейки?

2.

B таблице есть автоматическая нумерация строк.
Забираю информацию с ячейки набранный текст и со знаками табуляции.
Как мне получить нумерацию строк + текст и без знаков табуляции?

Решение задачи: «Таблица в Word»

textual
Листинг программы
<font color="blue">Sub</font> s()
  <font color="blue">Dim</font> v_Tbl <font color="blue">As</font> Table, v_Cell <font color="blue">As</font> Cell
  
  <font color="blue">Set</font> v_Tbl = ThisDocument.Tables(<font color="darkblue"><b>1</b></font>)
  <font color="blue">For</font> <font color="blue">Each</font> v_Cell <font color="blue">In</font> v_Tbl.Range.Cells
    <font color="00AA00">'что-то делаем, например:</font>
    v_Cell.Range.Text = v_Cell.RowIndex & v_Cell.ColumnIndex
  <font color="blue">Next</font>
<font color="blue">End</font> <font color="blue">Sub</font>

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4.2 из 5