====== Word ======
===== Gyorsítás =====
  * http://blog.nhcomputerlearning.com/2012/06/06/speed-up-your-scrolling-in-large-word-documents/
  * http://www.howtogeek.com/74007/how-to-speed-up-microsoft-word-2007-and-2010/


===== Nem használt stílusok eltávolítása =====
  * https://word.tips.net/T001337_Removing_Unused_Styles.html

<code vb>
Sub DeleteUnusedStyles()
    Dim oStyle As Style

    For Each oStyle In ActiveDocument.Styles
        'Only check out non-built-in styles
        If oStyle.BuiltIn = False Then
            With ActiveDocument.Content.Find
                .ClearFormatting
                .Style = oStyle.NameLocal
                .Execute FindText:="", Format:=True
                If .Found = False Then oStyle.Delete
            End With
        End If
    Next oStyle
End Sub
</code>