Автоматизация приложений Microsoft Office в примерах

       

Создание таблиц


Создавать таблицы можно двумя способами. Первый заключается в вызове метода Add коллекции Tables объекта Document и последовательном заполнении ячеек данными. Этот способ при позднем связывании работает довольно медленно.

Второй способ, намного более <быстрый>, заключается в создании текста из нескольких строк, содержащих подстроки с разделителями (в качестве разделителя можно использовать любой или почти любой символ, нужно только, чтобы он заведомо не встречался в данных, которые будут помещены в будущую таблицу), и последующей конвертации такого текста в таблицу с помощью метода ConvertToTable объекта Range. Ниже приведен пример создания таблицы из трех строк и трех столбцов этим способом (в качеcтве разделителя, являющегося первым параметром метода ConvertToTable, используется запятая):

Var    Rng : Variant; ...    Rng := App.Selection.Range;    Rng.Collapse(wdCollapseEnd);    Rng.InsertAfter('1, 2, 3');    Rng.InsertParagraphAfter;    Rng.InsertAfter('4,5,6');    Rng.InsertParagraphAfter;    Rng.InsertAfter('7,8,9');    Rng.InsertParagraphAfter;    Rng.ConvertToTable(',');

Отметим, что внешний вид таблицы можно изменить с помощью свойства Format, а также с помощью свойств коллекции Columns, представляющей колонки таблицы, и коллекции Rows, представляющей строки таблицы объекта Table.



Содержание раздела