通过

TableView.ColumnFont 属性 (Outlook)

  • 项目

返回一个 ViewFont 对象，该对象代表在 TableView 对象中显示列标题时使用的字体。 只读。

语法

expression。 ColumnFont

表达 一个代表 TableView 对象的变量。

示例

以下Visual Basic for Applications (VBA) 示例递增从当前 TableView 对象的 ColumnFont 属性返回的 ViewFont 对象的 Size 属性值。

Private Sub IncreaseColumnFontSize() 
 
 Dim objTableView As TableView 
 
 
 
 If Application.ActiveExplorer.CurrentView.ViewType = _ 
 
 olTableView Then 
 
 
 
 ' Obtain a TableView object reference for the 
 
 ' current table view. 
 
 Set objTableView = _ 
 
 Application.ActiveExplorer.CurrentView 
 
 
 
 ' Increment the Size property of the 
 
 ' ViewFont object obtained from the 
 
 ' ColumnFont property, but only 
 
 ' if the font is less than 24 points 
 
 ' in size. 
 
 If objTableView.ColumnFont.Size < 24 Then 
 
 objTableView.ColumnFont.Size = _ 
 
 objTableView.ColumnFont.Size + 1 
 
 
 
 ' Save the table view. 
 
 objTableView.Save 
 
 End If 
 
 End If 
 
End Sub

另请参阅

表对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。