Прочитать на английском

Поделиться через


Объект Cells (Word)

Коллекция объектов Cell в столбце таблицы, строке таблицы, выделении или диапазоне.

Замечания

Используйте свойство Cells , чтобы вернуть коллекцию Cells . Следующий пример форматирует ячейки в первой строке таблицы в активном документе, чтобы они были шириной 30 точек.

ActiveDocument.Tables(1).Rows(1).Cells.Width = 30

В следующем примере возвращается количество ячеек в текущей строке.

num = Selection.Rows(1).Cells.Count

Используйте метод Add , чтобы добавить объект Cell в коллекцию Cells . Для вставки новых ячеек можно также использовать метод InsertCells объекта Selection . В следующем примере перед первой ячейкой в myTable добавляется ячейка.

Set myTable = ActiveDocument.Tables(1) 
myTable.Range.Cells.Add BeforeCell:=myTable.Cell(1, 1)

Используйте ячейку (строка, столбец), где строка — номер строки, а столбец — номер столбца, или Cells (index), где index — номер индекса, чтобы вернуть объект Cell . В следующем примере применяется заливка ко второй ячейке в первой строке первой таблицы.

Set myCell = ActiveDocument.Tables(1).Cell(Row:=1, Column:=2) 
myCell.Shading.Texture = wdTexture20Percent

В следующем примере применяется заливка к первой ячейке в первой строке.

ActiveDocument.Tables(1).Rows(1).Cells(1).Shading _ 
 .Texture = wdTexture20Percent

Замечания

Используйте метод Add с коллекцией Rows или Columns , чтобы добавить строку или столбец ячеек. В следующем примере в первую таблицу активного документа добавляется столбец, а затем в первый столбец вставляются цифры.

Set myTable = ActiveDocument.Tables(1) 
Set aColumn = myTable.Columns.Add(BeforeColumn:=myTable.Columns(1)) 
For Each aCell In aColumn.Cells 
 aCell.Range.Delete 
 aCell.Range.InsertAfter num + 1 
 num = num + 1 
Next aCell

Методы

Свойства

См. также

Справочник по объектной модели Word

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.