У меня есть следующий код:
Dim ResultWorkbook As Workbook
Dim ResultsSheet As Worksheet
On Error Resume Next
Set ResultWorkbook = Workbooks.Open("C:\Temp\NonExistantWorkbook.xlsx")
On Error GoTo 0
If ResultWorkbook Is Nothing Then
....
Однако, когда я запускаю код, он ВСЕГДА ломается в строке 'Set' (даже если я указал продолжить при ошибке).
У кого-нибудь есть механизм, чтобы обойти это?Я хочу, чтобы код продолжался, и я обработаю ошибку в блоке «Если».
Я проверил Инструменты -> Параметры -> Общие -> и удостоверился, что «Перехват ошибок» установлен на «Разрыв необработанных ошибок».Msgstr ".
Обновление - предлагаемая ссылка - метод, с помощью которого я собираюсь обойти эту ошибку.Тем не менее, я надеюсь, что кто-то знает, почему «Ошибка при возобновлении следующего» не работает, поэтому я могу вернуться к моему предпочтительному способу открытия файла.