У нас вы можете посмотреть бесплатно #12 How to Handle Errors and Debug Excel VBA Code или скачать в максимальном доступном качестве, видео которое было загружено на ютуб. Для загрузки выберите вариант из формы ниже:
Если кнопки скачивания не
загрузились
НАЖМИТЕ ЗДЕСЬ или обновите страницу
Если возникают проблемы со скачиванием видео, пожалуйста напишите в поддержку по адресу внизу
страницы.
Спасибо за использование сервиса ClipSaver.ru
Sub SyntaxErrorDemo() Dim x As Integer x = 5 * (3 + 2) End Sub Sub RuntimeErrorDemo() On Error Resume Next Dim x As Integer, y As Integer x = 10 y = 0 Debug.Print x / y End Sub Sub LogicErrorDemo() Dim radius As Double, area As Double radius = 5 area = 2 * 3.14159 * radius Debug.Print "Area of the circle: " & area End Sub Sub ErrorHandlingDemo() On Error GoTo ErrorHandler 'ERROR CAUSING CODE Dim x As Integer, y As Integer x = 10 y = 0 Debug.Print x / y Exit Sub 'THE REST OF YOUR CODE ErrorHandler: Debug.Print "An error occurred. Please ensure you are not dividing by zero." End Sub Sub DebuggingDemo() Dim i As Integer, sum As Integer sum = 0 For i = 1 To 5 sum = sum + i Debug.Print "Current sum after adding " & i & " is: " & sum Next i End Sub