VBA FEJL - Trin for trin-eksempler til brug af IFERROR VBA-funktion

Indholdsfortegnelse

FEJLFunktion i VBA

Ligesom vi bruger IFERROR i excel for at vide, hvad vi skal gøre, når der opstår en fejl før hver funktion, har vi en indbygget IFERROR-funktion i VBA, der bruges på samme måde, da det er en regnearksfunktion, bruger vi denne funktion sammen med regnearket. Funktion metode i VBA, og derefter giver vi argumenterne for funktionen.

FEJLFunktion i VBA

Det er en forbrydelse at forvente, at koden fungerer uden at kaste fejl. For at håndtere fejl i VBA har vi flere måder at bruge udsagn som On Error Resume Next VBA, On Error Resume Goto 0, On Error GoTo Label. VBA-fejlhåndterere kan kun gå videre til næste linie kode. Men i tilfælde af at beregningen ikke sker, er vi nødt til at erstatte fejlen med et andet identitetsord. I denne artikel vil vi se, hvordan man opnår dette ved at bruge VBA IFERROR-funktion i Excel.

Hvordan bruges IFERROR i VBA?

Ting at huske her er, at det ikke er en VBA-funktion, snarere som en regnearksfunktion.

Tag f.eks. Kun ovenstående data til en demonstration.

Trin 1: Definer variablen som et heltal .

Kode:

Sub Iferror_Example1 () Dim i Som Integer End Sub

Trin 2: Åbn For Next Loop for at udføre beregningen .

Kode:

Sub Iferror_Example1 () Dim i som heltal for i = 2 til 6 næste i End Sub

Trin 3: Inde i skriv koden som celler (I, 3) .Værdi =

Kode:

Sub Iferror_Example1 () Dim i som heltal for i = 2 til 6 celler (i, 3). Værdi = Næste i End Sub

Trin 4: For at få adgang til IFERROR-funktionen kan vi ikke bare skrive formlen; snarere er vi nødt til at bruge klassen “WorksheetFunction” .

Kode:

Sub Iferror_Example1 () Dim i som heltal for i = 2 til 6 celler (i, 3). Værdi = WorksheetFunction. Hvis næste afslutter jeg Sub

Trin 5: Som du kan se i ovenstående billede, efter at have indsat kommandoen "WorksheetFunction" -klassen, får vi IFERROR-formlen. Vælg formlen.

Kode:

Sub Iferror_Example1 () Dim i som heltal for i = 2 til 6 celler (i, 3) .Value = WorksheetFunction.IfError (Next i End Sub

Trin 6: Et af problemerne i VBA, når du får adgang til regnearkfunktionerne, får vi ikke se argumenterne, som vi har set i regnearket. Du skal være sikker på de argumenter, vi bruger.

Dette er grunden til, før jeg viser dig FEJL i VBA, har jeg vist dig syntaksen for regnearksfunktionen.

Det første argument her er "Værdi", dvs. hvad er den celle, du vil kontrollere? Inden dette skal du anvende beregningen i Cell.

Nu i VBA skal du anvende nedenstående koder.

Kode:

Sub Iferror_Example1 () Dim i som heltal for i = 2 til 6 celler (i, 4) .Værdi = WorksheetFunction.IfError (Celler (i, 3) .Værdi, "Ikke fundet") Næste i Afslut sub

Nu kontrollerer IFERROR-funktionen for enhver fejl i kolonne C. Hvis en fejl finder den, vises resultatet som "Ikke fundet" i kolonne D.

Som dette ved hjælp af IFERROR-funktionen kan vi ændre resultaterne efter vores ønske. I dette tilfælde har jeg ændret resultatet som "Ikke fundet." Du kan ændre dette til dit krav.