Вообще, ошибка классическая. Советую очень внимательно ознакомиться со статьей:
Как из Excel обратиться к другому приложениюИ вот с этой статьей тоже:
Variable not defined или что такое Option Explicit и зачем оно нужно?Избежите многих ошибок и лишних раздумий. Если бы директива Option Explicit была у Вас включена - то VBA сразу бы подсветил Вам необъявленную wdFormatXMLDocumentMacroEnabled и Вы бы догадались, что Excel про неё не знает. Замените её на 13. Но и код я бы еще чуть подправил, т.к. есть вероятность, что Word выдает какое-либо сообщение перед закрытием. Поэтому так:
Sub dddd()
Set wd1 = CreateObject("Word.Document")
Set wd2 = wd1.Application
wd2.Selection.Typetext "123 абв"
wd1.SaveAs "C:\1\123абв.docm", 13 ' wdFormatXMLDocumentMacroEnabled
wd2.DisplayAlerts = False
wd1.Close False
On Error Resume Next
wd2.Quit False
End Sub