Куда лучше вставить в код "ActiveWorkbook.Save"?

[Дмитрий Щербаков(The_Prist)]

Скорее всего форма просто не успевает выгрузится из памяти, а Вы уже пытаетесь закрыть весь Excel. Надо менять стратегию.
На событие UserForm_QueryClose повесьте что-то вроде:

Код: (vb)

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    Application.OnTime Now, "CloseWb"
End Sub

а в стандартный модуль запишите уже закрытие книги(кстати, прямо здесь можно указать сохранять или нет)

Код: (vb)

Sub CloseWb()
    ThisWorkbook.Close True 'true если надо сохранить
End Sub

[Andrew_Ko]

Но вот boa как-то смог без таймера обойтись - см. его приложенный файл чуть выше. Я пока так и не понял в чём фокус - там дважды используется Quit ...

[Дмитрий Щербаков(The_Prist)]

там дважды используется Quit

Не самый лучший способ. Есть шанс, что и второй Quit не решит проблемы.

[Andrew_Ko]

тогда третий Quit окончательно решит проблему!
и я так и не понял: второй Quit у него - что-то типа "контрольного выстрела"?
----------------------------
кстати, а у формы нет, случаем, какого-то св-ва, типа: "я закрылась/выгрузилась" или это только через АПИ можно получить?

[Дмитрий Щербаков(The_Prist)]

у формы нет, случаем, какого-то св-ва, типа: "я закрылась/выгрузилась"

нет, к сожалению. Но Application.OnTime как раз решает проблему - если присмотреться, то таймера как такового нет, т.к. вызываем без задержки. Но особенность метода в том, что он заставляет ожидать полного отклика от приложения Excel после завершения всех внутренних процессов и только после этого будет вызвана заданная процедура. Это так же относится к ожиданию выгрузки формы.

[boa]

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

[boa]

Дмитрий,
параллельный вопрос,
С запуском макроса после окончания выполняемой процедуры ontime действительно прекрасно справляется,
а вот

он заставляет ожидать полного отклика от приложения Excel после завершения всех внутренних процессов

а doevents данную проблему не решает?

[Andrew_Ko]

А у меня OnTime в тестовом файле работает прекрасно, а в реальном опять вылезает вопрос о сохранении изменений , там форма намно-о-ого сложнее.
Но, зато, прекрасно отрабатывает вариант boa! Вот и пойми этих женщин( я про форму)!

[Дмитрий Щербаков(The_Prist)]

а doevents данную проблему не решает?

Нет, DoEvents лишь передает управление накопившимся процессам, но ничего сам не ждет.

OnTime в тестовом файле работает прекрасно, а в реальном опять вылезает вопрос о сохранении изменений

значит где-то проблема в кодах, это уже факт. Надо все кропотливо в режиме отладки трассировать.

[Andrew_Ko]

значит где-то проблема в кодах

где хоть искать то? Никаких явных Set без Nothing там явно нет...

[Дмитрий Щербаков(The_Prist)]

явных Set без Nothing там явно нет

а не обязательно они должны быть. Где искать - сложно сказать. Надо в режиме отладки трассировать все что происходит от момента нажатия кнопки закрытия. И там уже смотреть все подозрительное и все, что может подобное поведение вызвать.