AutoFormatType Property Example

This example formats the first table in the active document to use the Classic 1 AutoFormat if the current format is Simple 1, Simple 2, or Simple 3.

If ActiveDocument.Tables.Count >= 1 Then
    If ActiveDocument.Tables(1).AutoFormatType <= 3 Then
        ActiveDocument.Tables(1).AutoFormat _
            Format:=wdTableFormatClassic1
    End If
End If