Cara mengatasi error di VBA Excel

Salah satu kemampuan yang wajib dimiliki oleh programmer adalah kemampuan mengatasi error. Dalam membuat suatu program di VBA Excel tentunya pasti anda akan menjumpai error seperti gambar di atas, jika logika program yang anda buat bermasalah.

Lalu bagaiman cara mengatasinya agar tidak muncul jendela error seperti gambar di atas?

Kali ini web Matematika Akuntansi akan berbagi ilmu tentang Cara mengatasi error di VBA Excel. Untuk mengatasi error di VBA Excel bisa diatasi dengan cara memasang coding di bawah ini tepat letaknya sebelum coding yang menurut anda memungkinkan akan terjadi error :

on error resume next

Untuk lebih mudah memahaminya, kita praktikan pada contoh berikut ini :

Buat data misalkan seperti gambar berikut ini :

Buka jendela VBA dengan cara :

Pilih menu Developer → View Code

Setelah jendela VBA terbuka, maka buatlah module VBA baru untuk memasukan coding, dengan cara sebagai berikut :

Pilih menu Insert → pilih Module

Setelah jendela module muncul, maka masukan coding di bawah ini :

Sub copy_paste()
Sheets("Sheet1").Range("A1").Copy _
Destination:=Sheets("Sheet1").Range("B1")
Sheets("Sheet11").Range("A2").Copy _
Destination:=Sheets("Sheet1").Range("B2")
Sheets("Sheet1").Range("A3").Copy _
Destination:=Sheets("Sheet1").Range("B3")
End Sub

Jalankan coding tersebut dengan cara :

Pilih menu Run → Run Sub/UserForm

Setelah muncul jendela Macros → Klick tombol Run.

Maka hasilnya akan error seperti gambar di bawah ini :

Error terjadi karena ada coding yang bermasalah yaitu coding Sheets("Sheet11").Range("A2").Copy Destination:=Sheets ("Sheet1").Range("B2"). Coding di atas menjadia error karena tidak ada Sheet 11 pada workbook.

Maka untuk mengatasi hal tersebut letakan on error resume next di atas coding tersebut seperti gambar di bawah ini :

Kemudian jalankan kembali codingnya. Maka hasilnya akan menjadi :

Pada intinya coding on error resume next berfungsi untuk melewati coding yang bermasalah atau menskip coding yang bermasalah dan melanjutkan ke coding berikutnya.

Demikian artikel kali ini.

Mohon maaf apabila ada salah-salah kata.
Apabila ada yang ingin ditanyakan atau disampaikan, silahkan untuk menulis pada kolom komentar di bawah.

Referensi :