Sub yadda()
'
' yaddaMacro
' Macro recorded 23/11/2004 by Richard Barrett-Small
'
    With Options
        .LocalNetworkFile = False
        .AllowFastSave = True
        .BackgroundSave = True
        .CreateBackup = False
        .SavePropertiesPrompt = False
        .SaveInterval = 10
        .SaveNormalPrompt = False
        .DisableFeaturesbyDefault = False
    End With
    With ActiveDocument
        .ReadOnlyRecommended = False
        .EmbedTrueTypeFonts = False
        .SaveFormsData = False
        .SaveSubsetFonts = False
        .DoNotEmbedSystemFonts = True
        .Password = ""
        .WritePassword = ""
        .DisableFeatures = False
        .EmbedSmartTags = False
        .SmartTagsAsXMLProps = False
        .EmbedLinguisticData = True
    End With
    Application.DefaultSaveFormat = ""
    With autocorrect
        .CorrectInitialCaps = True
        .CorrectSentenceCaps = True
        .CorrectDays = True
        .CorrectCapsLock = True
        .ReplaceText = True
        .ReplaceTextFromSpellingChecker = True
        .CorrectKeyboardSetting = False
        .DisplayAutoCorrectOptions = True
        .CorrectTableCells = True
    End With
    With Options
        .LabelSmartTags = False
        .DisplaySmartTagButtons = True
    End With
End Sub