TableView.AutoPreviewFont Property (Outlook)

Office 2013 and later

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Returns a ViewFont object that represents the font used when automatically previewing Outlook items in the TableView object. Read-only.

expression .AutoPreviewFont

expression A variable that represents a TableView object.

The following Visual Basic for Applications (VBA) sample decrements the value of the Size property for the ViewFont object returned from the AutoPreviewFont property for the current TableView object.

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 = _ 
 ' 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. 
 End If 
 End If 
End Sub