全部显示
应用于 Cell 和 Cells 对象的 VerticalAlignment 属性。
该属性返回或设置表格的一个或多个单元格中文字的垂直对齐方式。WdCellVerticalAlignment，可读写。
| WdCellVerticalAlignment 可以是下列 WdCellVerticalAlignment 常量之一： |
| wdCellAlignVerticalBottom |
| wdCellAlignVerticalCenter |
| wdCellAlignVerticalTop |
expression.VerticalAlignment
expression 必需。该表达式返回上述对象之一。
应用于 PageSetup 对象的 VerticalAlignment 属性。
该属性返回或设置文档或某节中每一页上文字的垂直对齐方式。WdVerticalAlignment，可读写。
| WdVerticalAlignment 可以是下列 WdVerticalAlignment 常量之一： |
| wdAlignVerticalBottom |
| wdAlignVerticalCenter |
| wdAlignVerticalJustify |
| wdAlignVerticalTop |
expression.VerticalAlignment
expression 必需。该表达式返回一个 PageSetup 对象。
本示例在一个新文档中创建一个 3x3 表格，并为表格中每一个单元格分配连续的单元格号。然后将第一行的高度设置为 20 磅，并在单元格的顶端垂直对齐文本。
Set newDoc = Documents.Add
Set myTable = newDoc.Tables.Add(Selection.Range, 3, 3)
i = 1
For Each c In myTable.Range.Cells
c.Range.InsertAfter "Cell " & i
i = i + 1
Next
With myTable.Rows(1)
.Height = 20
.Cells.VerticalAlignment = wdAlignVerticalTop
End With本示例改变第一个文档的垂直对齐方式，使文本在上边距和下边距之间居中。
Documents(1).PageSetup.VerticalAlignment = wdAlignVerticalCenter本示例新建一个文档，并将相同的段落插入 10 次。然后设置新文档的垂直对齐方式，使 10 个段落在上边距和下边距之间等距排列（两端对齐）。
Set myDoc = Documents.Add
With myDoc.Content
For i = 1 to 9
.InsertAfter "This is a sentence."
.InsertParagraphAfter
Next i
.InsertAfter "This is a sentence."
End With
myDoc.PageSetup.VerticalAlignment = wdAlignVerticalJustify