Word - сохранение файла

Долго не мог понять проблему,  разглядывая эту бледно-розовую картинку.
Application.DisplayAlerts = False, не?

С кодом:

Sub mymacro()
    Application.DisplayAlerts = False
    ...

    Application.Quit
End Sub

Всё равно вылетает это:

А если прописать так:

Sub mymacro()
    Application.DisplayAlerts = False
    ...

    ActiveDocument.Close savechanges:=True
    Application.Quit
End Sub

То в ответ получаю это:

p.s.
А что, кстати, смешного-то в моём сообщении и скриншоте?

там вначале другая картинка была...
странно, а сохраняешь говоришь под другим именем?

Вот код сохраняющий в 2003:

Sub mymacro()
Dim FD As FileDialog
   
    Set FD = Application.FileDialog(msoFileDialogSaveAs)
        FD.FilterIndex = 3
        FD.Show
        ActiveDocument.SaveAs FD.SelectedItems(1)
        ActiveDocument.Close 0
End Sub

Всегда пожалуйста

Я прошу прощения за свою наглость, конечно, просто пытаюсь сэкономить каждый клик в каждом файле, а то файлов слишком уж много 

В моём макросе выделение текста записано так:

Selection.MoveDown Unit:=wdLine, Count:=12
Selection.MoveDown Unit:=wdLine, Count:=9, Extend:=wdExtend

Выделяю слова на 12-й строке, но т.к. количество слов заранее неизвестно, то приходится делать так: ставлю курсор в нужную позицию на строке, зажимаю Shift, нажимаю клавишу "Вниз" (таким образом выделяется вся 12-ая строка), потом, зажав Ctrl и нажимая клавишу "Влево" убираю выделение с 13-й строки до тех пор, пока курсор не окажется на 12-й строке:

Как-то так.

Блин, это просто сказка какая-то, чего ж я раньше-то сюда не обратился, балбес! 
aap77, спасибо огромное ещё раз!!!

Последнее только желание к золотой рыбке у старика осталось, но я сомневаюсь, что это вообще в принципе выполнимо средствами MSO. Допустим, я нахожусь в каталоге, в нём без малого миллион файлов, я нахожу нужный файл, открываю и макросом беру из него инфу в буфер. Потом этот файл удаляю за ненадобностью. Теперь моё желание: в макрос ворда нельзя записать, чтобы открытый файл удалялся в корзину сразу же после его закрытия?

Я так понял, что мы сохраняем файл под новым именем, а файл со старым именем удаляем?

Нет, чуть-чуть не так, извиняюсь за кривую постановку задачи.

У меня 2 папки: в первой - старые файлы (коих миллион с тележкой), во второй - новые, с мною заданными именами.

Захожу в первую папку, нахожу и открываю файл, выделяю и копирую из него нужный мне отрывок текста в несколько абзацев (с помощью простейшего макроса), закрываю и удаляю файл. Захожу в каталог-посредник, в котором файлы только для чтения (грубо говоря шаблоны), открываю подходящий файл, вставляю в него данные из буфера, выделяю те самые несколько слов и сохраняю во второй папке с уже новым именем. В общем схема как-то так и выглядит.

Теперь что мне нужно: мне просто нужно удалять файл-источник после его закрытия.