Объект 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
Имя |
---|
Application |
Borders |
Count |
Creator |
Height |
HeightRule |
NestingLevel |
Parent |
PreferredWidth |
PreferredWidthType |
Shading |
VerticalAlignment |
Width |
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.