TableView.AutoPreviewFont 属性 (Outlook)
返回一个 ViewFont 对象,该对象代表在 TableView 对象中自动预览 Outlook 项目时使用的字体。 只读。
语法
expression。 AutoPreviewFont
表达 一个代表 TableView 对象的变量。
示例
以下Visual Basic for Applications (VBA) 示例递减从当前 TableView 对象的 AutoPreviewFont 属性返回的 ViewFont 对象的 Size 属性值。
Private Sub ReduceAutoPreviewFontSize()
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
' Decrement the Size property of the
' ViewFont object obtained from the
' AutoPreviewFont property, but only
' if the font is 6 points or larger.
If objTableView.AutoPreviewFont.Size > 5 Then
objTableView.AutoPreviewFont.Size = _
objTableView.AutoPreviewFont.Size - 1
' Save the table view.
objTableView.Save
End If
End If
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。