VBA FEIL - Trinnvise eksempler for bruk av IFERROR VBA-funksjon

Innholdsfortegnelse

FEILFUNKSJON Funksjon i VBA

Akkurat som vi bruker IFERROR i Excel for å vite hva vi skal gjøre når det oppstår en feil før hver funksjon, har vi en innebygd IFERROR-funksjon i VBA som brukes på samme måte siden det er en regnearkfunksjon, bruker vi denne funksjonen sammen med regnearket. metode i VBA og så gir vi argumentene for funksjonen.

FEILFUNKSJON Funksjon i VBA

Det er en forbrytelse å forvente at koden skal fungere uten å kaste feil. For å håndtere feil i VBA har vi flere måter å bruke utsagn som On Error Resume Next VBA, On Error Resume Goto 0, On Error GoTo Label. VBA-feilhåndterere kan bare fortsette videre til neste kodelinje. Men i tilfelle hvis beregningen ikke skjer, må vi erstatte feilen med et annet identitetsord. I denne artikkelen vil vi se hvordan du kan oppnå dette ved å bruke VBA IFERROR Function i excel.

Hvordan bruker jeg IFERROR i VBA?

Tingen å huske her er at det ikke er en VBA-funksjon heller som en regnearkfunksjon.

Ta for eksempel dataene ovenfor bare for en demonstrasjon.

Trinn 1: Definer variabelen som et helt tall .

Kode:

Sub Iferror_Example1 () Dim i As Integer End Sub

Trinn 2: For å utføre beregning, åpne For Next Loop .

Kode:

Sub Iferror_Example1 () Dim i Som Integer For i = 2 Til 6 Neste i End Sub

Trinn 3: Skriv inn koden som celler (I, 3). Inne i verdien

Kode:

Sub Iferror_Example1 () Dim i som heltall for i = 2 til 6 celler (i, 3). Verdi = Neste i End Sub

Trinn 4: For å få tilgang til IFERROR-funksjonen, kan vi ikke bare skrive inn formelen; heller må vi bruke klassen “WorksheetFunction” .

Kode:

Sub Iferror_Example1 () Dim i As Ingerger For i = 2 til 6 celler (i, 3) .Value = WorksheetFunction.If Next i End Sub

Trinn 5: Som du kan se i bildet ovenfor, etter å ha satt inn kommandoen "WorksheetFunction" -klassen, får vi IFERROR-formelen. Velg formelen.

Kode:

Sub Iferror_Example1 () Dim i As Ingerger For i = 2 til 6 celler (i, 3) .Value = WorksheetFunction.IfError (Next i End Sub

Trinn 6: Et av problemene i VBA når du får tilgang til regnearkfunksjonene, vi får ikke se argumentene som hvordan vi har sett i regnearket. Du må være sikker på argumentene vi bruker.

Dette er grunnen til før jeg viser deg FEIL i VBA, har jeg vist deg syntaksen til regnearkfunksjonen.

Det første argumentet her er "Verdi", dvs. hva er cellen du vil sjekke? Før dette, bruk beregningen i Cell.

Nå i VBA, bruk kodene nedenfor.

Kode:

Sub Iferror_Example1 () Dim i As Integer For i = 2 til 6 celler (i, 4) .Value = WorksheetFunction.IfError (Cells (i, 3) .Value, "Not Found") Neste jeg avslutter sub

Nå sjekker IFERROR-funksjonen for eventuelle feil i kolonne C. Hvis en feil oppdager den, vises resultatet som "Ikke funnet" i kolonne D.

Som dette ved hjelp av IFERROR-funksjonen, kan vi endre resultatene etter eget ønske. I dette tilfellet har jeg endret resultatet som "Ikke funnet." Du kan endre dette til dine krav.