сохранение как имя файла в слове

В приведенном ниже коде имя файла жестко задано, но я хочу, чтобы пользователь мог его выбрать.

Я читал о GetSaveAsFilename, но при его использовании получаю сообщение об ошибке :"метод или элемент не найден".

fileSaveName = Application.GetSaveAsFilename _
    (fileFilter:="Excel Files (*.txt), *.txt")

Это написано для Word 2010. Я ошибаюсь, думая, что GetSaveAsFilenameдоступен в Word VBA?

 Sub Macro3()
'
' Macro3 Macro
'
'
    ActiveDocument.SaveAs2 FileName:="Questionnaire01-05-20122.txt", _
        FileFormat:=wdFormatText, LockComments:=False, Password:="", _
        AddToRecentFiles:=True, WritePassword:="", ReadOnlyRecommended:=False, _
        EmbedTrueTypeFonts:=False, SaveNativePictureFormat:=False, SaveFormsData _
        :=True, SaveAsAOCELetter:=False, Encoding:=1252, InsertLineBreaks:=False, _
         AllowSubstitutions:=False, LineEnding:=wdCRLF, CompatibilityMode:=0
End Sub