Document.DocumentTheme (Word)
Devuelve un objeto OfficeTheme que representa el tema de Microsoft Office aplicado a un documento.
Use el método ApplyDocumentTheme para aplicar un tema de Office.
Dim oteDocumentTheme As Office.OfficeTheme
Set oteDocumentTheme = ActiveDocument.DocumentTheme