[Ax3]

Всем привет, дорогие братья по разуму!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Не подскажете, как можно в обработчике события BeginSave изменить имя, с которым файл будет сохраняться?
P.S. Имеется в виду в VBA, хотя суть дела от этого не меняется, надеюсь.
P.P.S. В MS Word я делал по-другому - специально внутри обработчика делал сохранение документа с новым именем, а сохранение с текущим именем отменял. Но там синтаксис обработчика был
DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean),
то есть внутри обработчика новый вызов операции сохранения (с новым именем) проходил без проблем, а в конце обработчика можно было сделать Cancel=true, и текущий вызов операции сохранения (с текущим именем) отменялся.
А здесь обработчику события сохранения
AcadDocument_BeginSave(ByVal FileName As String)
передается только имя сохраняемого файла, и отменить вызов сохранения нельзя.

[kp+]

А зачем огород городить, если не секрет? Для перехвата стандартной команды qsave?
Не проще переопределить эту команду с помощью Redefine?

[Ax3]

Да понимаете, уважаемый, мне нужно перехватить событие сохранения save или saveas и определить, с правильным ли именем сохраняется файл, и если нет - то задать правильное имя (в имя файла включаются автор и дата). Насчет redefine - конечно, хороший вариант. Подумаю. Спасибо. Благодарю за отзывчивость.