Excel vba refresh wait

Я создаю код, в котором я могу щелкнуть одну кнопку, и он обновит таблицы запросов, которые у меня есть на этом листе.

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

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

Я хочу ждать не 5 секунд, а периода обновления, чтобы я не ждал слишком долго или слишком быстро, в зависимости от скорости Интернета и т. Д.

Как я могу это сделать?

Правка:

Простой код:

ActiveWorkbook.RefreshAll

Здесь мне нужен код задержки или ожидания, пока не завершится все обновление ... Затем

MsgBox("The Refreshing is Completed!")

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