Как выйти из веб-страницы, не получив Internet Explorer «появляются несохраненные изменения», появляется при автоматизации с помощью vba

Я попробовал обычное ожидание, чтобы интернет-страница закончила загрузку и попыталась установить фиксированную задержку, прежде чем начать с выхода. Подождать, пока страница закончит загрузку, не работает вообще, фиксированная задержка работает большую часть времени, но это не идеально. Последнее действие перед тем, как я попытаюсь покинуть страницу, – это нажать кнопку «Сохранить на сервер», поэтому я думаю, что это имеет какое-то отношение к времени, которое требуется серверу для ответа, который предположительно ограничивается скоростью Интернета и объясните, почему фиксированная задержка является успешной большую часть времени.

Может ли кто-нибудь пролить свет на то, как определить, закончила ли страница делать свою вещь?

Вот что я пробовал:

While IE.Busy DoEvents Wend

Do Until IE.statusText = "Done" DoEvents Loop

Do Until IE.readyState = 4 DoEvents Loop

Также Application.wait Now + Timevalue ("00:00:02)

Interesting Posts
Давайте будем гением компьютера.