Похоже, что ответ пользователя на вопрос диалогового окна Delete
не доступен, как рекламируется. Поэтому я использовал логи c о том, что удаленный объект больше не должен существовать для получения той же самой Истинной / Ложной информации.
WsLib.Delete
On Error Resume Next
Set Rng = WsLib.Cells(1, 1)
If Err = 0 Then
Debug.Print "WsLib wasn't deleted"
End If
Err.Clear
В этом фрагменте кода WsLib
представляет собой рабочий лист. Оповещения приложений не подавляются. Попытка установить Rng
не удастся, если рабочий лист был удален. Следовательно, если ошибки не возникает, удаление было остановлено.
До этого я пытался вернуть выражение WsLib Is Nothing
в значение False, если пользователь нажал Отмена в диалоговом окне предупреждения. К сожалению, это не сработало, потому что Is Nothing
проверяет переменную, а не объект.