VBA IFERROR - Primjeri korak po korak za upotrebu funkcije IFERROR VBA

Sadržaj

IFERROR funkcija u VBA

Baš kao što koristimo IFERROR u Excelu da bismo znali što učiniti kad se prije svake funkcije naiđe na pogrešku, tako imamo ugrađenu IFERROR funkciju u VBA koja se koristi na isti način jer je funkcija radnog lista, a ovu funkciju koristimo s radnim listom. metodu u VBA, a zatim dajemo argumente za funkciju.

IFERROR funkcija u VBA

Zločin je očekivati da kod funkcionira bez ikakve pogreške. Za rješavanje pogrešaka u VBA-u imamo nekoliko načina pomoću izjava poput On Error Resume Next VBA, On Error Resume Goto 0, On Error GoTo Label. VBA obrađivači pogrešaka mogu nastaviti samo do sljedećeg retka koda. Ali u slučaju da se izračun ne dogodi, trebamo zamijeniti pogrešku nekom drugom identitetnom riječju. U ovom ćemo članku vidjeti kako to postići upotrebom funkcije VBA IFERROR u Excelu.

Kako koristiti IFERROR u VBA?

Ovdje treba imati na umu da to nije VBA funkcija, već samo funkcija radnog lista.

Na primjer, uzmite gornje podatke samo za demonstraciju.

Korak 1: Definirajte varijablu kao cijeli broj .

Kodirati:

Sub Iferror_Example1 () Dim i As Integer End Sub

Korak 2: Da biste izvršili izračun, otvorite For Next Loop .

Kodirati:

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

Korak 3: Unutar koda upišite kao Ćelije (I, 3) .Vrijednost =

Kodirati:

Sub Iferror_Example1 () Dim i kao cijelo za i = 2 do 6 ćelija (i, 3) .Vrijednost = Sljedeće i Kraj Sub

Korak 4: Da bismo pristupili funkciji IFERROR, ne možemo jednostavno upisati formulu; radije trebamo koristiti klasu "WorksheetFunction" .

Kodirati:

Sub Iferror_Example1 () Dim i kao cjelina za i = 2 do 6 ćelija (i, 3) .Vrijednost = Funkcija radnog lista.Ako je dalje i Završi Sub

Korak 5: Kao što vidite na gornjoj slici, nakon umetanja klase "WorksheetFunction" klase, dobivamo formulu IFERROR. Odaberite formulu.

Kodirati:

Sub Iferror_Example1 () Dim i kao cijelo za i = 2 do 6 ćelija (i, 3) .Value = Funkcija radnog lista.IfError (Sljedeće i Završi Sub

Korak 6: Jedan od problema u VBA tijekom pristupa funkcijama radnog lista ne možemo vidjeti argumente poput onoga što smo vidjeli na radnom listu. Morate biti sigurni u argumente koje koristimo.

To je razlog prije nego što vam pokažem IFERROR u VBA, pokazao sam vam sintaksu funkcije radnog lista.

Prvi argument ovdje je "Vrijednost", tj. Koja je ćelija koju želite provjeriti? Prije toga primijenite izračun u Ćelija.

Sada u VBA primijenite donje kodove.

Kodirati:

Sub Iferror_Example1 () Dim i kao cijelo za i = 2 do 6 ćelija (i, 4) .Value = WorksheetFunction.IfError (Cells (i, 3) .Value, "Not Found") Sljedeće i End Sub

Sada funkcija IFERROR provjerava ima li pogrešaka u stupcu C. Ako bilo koja pogreška pronađe, rezultat će se prikazati kao "Nije pronađeno" u stupcu D.

Kao i ovaj pomoću funkcije IFERROR, možemo mijenjati rezultate prema našoj želji. U ovom sam slučaju rezultat promijenio kao "Nije pronađeno". Možete to promijeniti prema svom zahtjevu.