VBA IFERROR - Contoh Langkah demi Langkah untuk menggunakan Fungsi IFERROR VBA

Daftar Isi

Fungsi IFERROR di VBA

Sama seperti kita menggunakan IFERROR di excel untuk mengetahui apa yang harus dilakukan ketika kesalahan ditemukan sebelum setiap fungsi kita memiliki fungsi IFERROR inbuilt di VBA yang digunakan dengan cara yang sama karena ini adalah fungsi lembar kerja, kita menggunakan fungsi ini dengan worksheet.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 error 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. Tetapi jika kalkulasi tidak terjadi, kita perlu mengganti kesalahan dengan beberapa kata identitas lainnya. 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 ini bukan fungsi VBA melainkan hanya sebagai fungsi lembar kerja.

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; sebaliknya, 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 kelas "WorksheetFunction", 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 yakin tentang argumen yang kami gunakan.

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

Argumen pertama di sini adalah "Nilai", yaitu, sel apa yang ingin Anda periksa? Sebelum ini, terapkan perhitungan di Cell.

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, 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 hasil sebagai "Tidak Ditemukan". Anda dapat mengubahnya sesuai kebutuhan Anda.