Как изменить время ожидания обновления Excel XML по умолчанию (с помощью VBA)?

Question

Я нашел немного кода VBA, который обновляет данные в карте XML:

ActiveWorkbook.XmlMaps("Map").DataBinding.Refresh

Сервер, предоставляющий источник XML, иногда загружается, поэтому я хотел бы иметь возможность переопределить время ожидания по умолчанию на что-то очень короткое, например 5 секунд и перейдите к следующему разделу кода, когда это произойдет. Как я могу это сделать?

Answer 1

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

Это небрежно, но вы можете сделать привязку асинхронной (свойство ASync) и поставить 5-секундное ожидание, прежде чем продолжить (или использовать свойство BindingInProgress в сочетании). Затем ваш код после обновления выполняется независимо от того, что (тайм-аут или нет).