VBA WORD. Как вставить перевод курсора перед и после таблицы?

Перед и после второй таблицы в документе нужно что-бы было 2 пустых строки.

   Set tbl = ActiveDocument.Tables(2)
   tbl.Range.Select
   Selection.Collapse Direction:=wdCollapseStart
   Selection.InsertBefore Text:=vbCrLf & vbCrLf
   tbl.Range.Select
   Selection.Collapse Direction:=wdCollapseEnd
   Selection.InsertAfter Text:=vbCrLf & vbCrLf

Только один с переводов каретки, которые должны быть перед таблицей, почему-то помещается в первую ячейку первой строки. Как исправить?


Ответы (0 шт):