Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Задает ширину столбцов или ячеек в таблице.
Синтаксис
выражение.
SetWidth( _ColumnWidth_ , _RulerStyle_ )
выражение (обязательно). Переменная, представляющая коллекцию Cells.
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| ColumnWidth | Обязательный | Single | Ширина указанного столбца или столбцов в точках. |
| RulerStyle | Обязательный | WdRulerStyle | Управляет тем, как Word изменяет ширину ячеек. |
Замечания
Описанное выше поведение WdRulerStyle применяется к таблицам с выравниванием по левому краю. Поведение WdRulerStyle для таблиц с выравниванием по центру и по правому краю может быть непредвиденным. в таких случаях метод SetWidth следует использовать с осторожностью.
Пример
В этом примере создается таблица в новом документе и устанавливается ширина первой ячейки во второй строке в 1,5 дюйма. В примере сохраняются ширины других ячеек в таблице.
Set newDoc = Documents.Add
Set myTable = _
newDoc.Tables.Add(Range:=Selection.Range, NumRows:=3, _
NumColumns:=3)
myTable.Cell(2,1).SetWidth _
ColumnWidth:=InchesToPoints(1.5), _
RulerStyle:=wdAdjustNone
В этом примере задается ширина ячейки, содержащей точку вставки, 36 точек. В примере также сужается первый столбец, чтобы сохранить положение правого края таблицы.
If Selection.Information(wdWithInTable) = True Then
Selection.Cells(1).SetWidth ColumnWidth:=36, _
RulerStyle:=wdAdjustFirstColumn
Else
MsgBox "The insertion point is not in a table."
End If
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.