Set Auto Correct options

[island17]

I am going to mark this one solved. I found what I was looking for. Thanks for the help. Here is the code for the last piece.

With Options
    .UpdateLinksAtPrint = True
    .PrintDrawingObjects = True
    .AutoFormatAsYouTypeApplyHeadings = False
    .AutoFormatAsYouTypeApplyBorders = False
    .AutoFormatAsYouTypeApplyBulletedLists = False
    .AutoFormatAsYouTypeApplyNumberedLists = False
    .AutoFormatAsYouTypeApplyTables = False
    .AutoFormatAsYouTypeReplaceQuotes = True
    .AutoFormatAsYouTypeReplaceSymbols = True
    .AutoFormatAsYouTypeReplaceOrdinals = False
    .AutoFormatAsYouTypeReplacePlainTextEmphasis = True
    .AutoFormatAsYouTypeFormatListItemBeginning = False
    .AutoFormatAsYouTypeDefineStyles = False
    .AutoFormatApplyHeadings = False
    .AutoFormatApplyLists = False
    .AutoFormatApplyBulletedLists = False
    .AutoFormatApplyOtherParas = False
    .AutoFormatReplaceQuotes = True
    .AutoFormatReplaceSymbols = True
    .AutoFormatReplaceOrdinals = False
    .AutoFormatReplacePlainTextEmphasis = False
    .AutoFormatPreserveStyles = True
    .AutoFormatPlainTextWordMail = True
End With