Selection.MoveDown Unit:=wdLine, Count:=2
Selection.MoveUp Unit:=wdLine, Count:=1
Selection.MoveDown Unit:=wdLine, Count:=6, Extend:=wdExtend
Selection.Cells.Merge
Обьединение строк в таблице Word
В Borland C++ Builder 6 для Winword 2000/XP
Объединить в выбранном столбце таблицы все строки начиная с N-ой и выравнить текст по верхнему левому краю . Кол-во строк переменное.
т.е. реализовать код VBA:
Код:
для TWordApplication.