Начало каждой строки таблицы с новой страницы

[kcgmizin]

Помогите пожалуйста разобраться, как в ворде разбить таблицу так, чтобы каждая ее строка начиналась с новой страницы. В замене специальных символов что-то я не нашел, чтобы осуществить такую замену.

[viter.alex]

Не нужно ничего разбивать. Выдели таблицу, Абзац→Положение на странице→С новой страницы. Всё.

[kcgmizin]

Сообщение от viter.alex

Не нужно ничего разбивать. Выдели таблицу, Абзац→Положение на странице→С новой страницы. Всё.

Спасибо то что надо.
Только что нарисовалась еще одна проблемка: Можно ли как-то сделать так чтобы каждая строчка таблица начиналась с нового листа, но если в первом поле (допустим назовем его идентификатор) номера у строк совпадают, то эти строчки отображались на одном листе.

[kcgmizin]

Что никто не знает, тогда немного изменю вопрос. Как будет выглядеть макрос если нужно считать и записать в переменную число 1поля 1строки, далее переместиться на 1поле 2строки и считать число в переменную, если они(эти 2 переменные) не совпадают, значит поставить разрыв страницы если же совпадают перейти ниже(на 1поле 3строки) и переходить ниже до тех пор пока 1 поле не начнет различаться. Таким образом должно получиться что на каждой странице может быть только одна запись или несколько, но с одинаковым первым полем в каждой строке. Данные в исходной таблице отсортированы так что если числа в 1 поле разных строк совпадают, то такие строки расположены рядом друг с другом и их колличество обычно 2-3, но точно не больше 10.

[viter.alex]

Поле — это столбец? Тогда строку нужно называть записью
Вот так:

Sub RowAtNewPage()
  Dim oTbl As Table
  Dim oCell As Cell
  Dim sVal As String
  Set oTbl = Selection.Tables(1)
  For Each oCell In oTbl.Columns.First.Cells
    oCell.Range.ParagraphFormat.PageBreakBefore = oCell.Range.Text <> sVal
    sVal = oCell.Range.Text
  Next
End Sub

[kcgmizin]

большое человеческое спасибо