Да, это можно определить с помощью свойства HasVBProject
.Например:
If ActiveDocument.HasVBProject = True Then
'Code to save as .dotm
Else
'Code to save as .dotx
End If
Для тех, кто может наткнуться на этот пост позже, стоит отметить, что этот код следует размещать за пределами тестируемого документа на наличие макросов (в противном случае он обнаружил бы себя).Два часто используемых параметра - доступ к коду из внешнего приложения или из шаблона, хранящегося в папке автозагрузки Word.