VBA IFERROR

Sama seperti kami menggunakan IFERROR di excel untuk mengetahui apa yang harus dilakukan ketika kesalahan ditemukan sebelum setiap fungsi, kami memiliki fungsi IFERROR bawaan di VBA yang digunakan dengan cara yang sama karena ini adalah fungsi lembar kerja, kami menggunakan fungsi ini dengan lembar kerja.fungsi metode di VBA dan kemudian kami memberikan argumen untuk fungsi tersebut.

Fungsi IFERROR di VBA

Merupakan kejahatan untuk mengharapkan kode berfungsi tanpa menimbulkan kesalahan apa pun. Untuk menangani kesalahan di VBA kami memiliki beberapa cara menggunakan pernyataan seperti On Error Resume Next VBA, On Error Resume Goto 0, On Error GoTo Label. Penangan kesalahan VBA hanya dapat melanjutkan lebih jauh ke baris kode berikutnya. Namun jika kalkulasi tidak terjadi, kita perlu mengganti kesalahan dengan beberapa kata identitas lain. Pada artikel ini, kita akan melihat bagaimana mencapai ini dengan menggunakan Fungsi VBA IFERROR di excel.

Bagaimana cara menggunakan IFERROR di VBA?

Hal yang perlu diingat di sini adalah bukan fungsi VBA melainkan hanya sebagai fungsi lembar kerja.

Anda dapat mengunduh Template Excel VBA IFERROR ini di sini - Template Excel VBA IFERROR

Misalnya, ambil data di atas hanya untuk demonstrasi.

Langkah 1: Tentukan variabel sebagai integer .

Kode:

 Sub Iferror_Example1 () Dim i As Integer End Sub 

Langkah 2: Untuk melakukan kalkulasi, buka For Next Loop .

Kode:

 Sub Iferror_Example1 () Dim i As Integer For i = 2 To 6 Next i End Sub 

Langkah 3: Di dalam kode tulis sebagai Cells (I, 3) .Value =

Kode:

 Sub Iferror_Example1 () Dim i As Integer For i = 2 To 6 Cells (i, 3]. Value = Next i End Sub 

Langkah 4: Untuk mengakses fungsi IFERROR, kita tidak bisa begitu saja mengetik rumusnya melainkan kita perlu menggunakan kelas "WorksheetFunction" .

Kode:

 Sub Iferror_Example1 () Dim i As Integer For i = 2 To 6 Cells (i, 3]. Value = WorksheetFunction. If Next i End Sub 

Langkah 5: Seperti yang Anda lihat pada gambar di atas setelah memasukkan perintah "WorksheetFunction" kelas kita mendapatkan rumus IFERROR. Pilih rumusnya.

Kode:

 Sub Iferror_Example1 () Dim i As Integer For i = 2 To 6 Cells (i, 3) .Value = WorksheetFunction.IfError (Next i End Sub 

Langkah 6: Salah satu masalah di VBA saat mengakses fungsi lembar kerja, kami tidak bisa melihat argumen seperti yang telah kita lihat di lembar kerja. Anda harus benar-benar yakin tentang argumen yang kami gunakan.

Ini adalah alasan sebelum saya menunjukkan IFERROR di VBA, saya telah menunjukkan kepada Anda sintaks fungsi lembar kerja.

Argumen pertama di sini adalah "Nilai" yaitu sel apa yang ingin Anda periksa Sebelum ini menerapkan perhitungan di Sel.

Sekarang di VBA terapkan kode di bawah ini.

Kode:

 Sub Iferror_Example1 () Dim i As Integer For i = 2 To 6 Cells (i, 4) .Value = WorksheetFunction.IfError (Cells (i, 3) .Value, "Not Found") Berikutnya i End Sub 

Sekarang fungsi IFERROR memeriksa kesalahan apa pun di kolom C, jika ada kesalahan yang ditemukan maka hasilnya akan ditampilkan sebagai "Tidak Ditemukan" di kolom D.

Seperti ini dengan menggunakan fungsi IFERROR, kita dapat mengubah hasilnya sesuai keinginan kita. Dalam kasus ini, saya telah mengubah hasilnya menjadi "Tidak Ditemukan". Anda dapat mengubahnya sesuai kebutuhan Anda.

Jenis Kesalahan, VBA IFERROR Dapat Menemukan

Penting untuk mengetahui jenis kesalahan excel yang dapat ditangani oleh fungsi IFERROR. Berikut adalah jenis kesalahan yang dapat ditangani IFERROR.

# T / A, #VALUE !, #REF !, # DIV / 0 !, #NUM !, #NAME ?, atau #NULL !.