Använd egenskapen WorksheetFunction i Excel VBA för att komma åt VLOOKUP fungera. Allt du behöver är en enda kodrad.
Situation:
1. Lägg en kommandoknapp på ditt kalkylblad och lägg till följande kodrad:
Range ("H3"). Value = WorksheetFunction.VLookup (Range ("H2"), Range ("B3: E9"), 4, False)
När du klickar på kommandoknappen i kalkylbladet använder Excel VBA funktionen VISNING för att leta upp lönen för ID 53 och placerar resultatet i cell H3.
Obs! Besök vår sida om VLOOKUP -funktionen för att lära dig mer om denna Excel -funktion.
Om VLOOKUP -funktionen inte kan hitta en matchning returnerar Excel VBA "Det går inte att få VLookup -egendom av WorksheetFunction -klassen "fel.
2. Ange till exempel värdet 28 i cell H2.
Resultat när du klickar på kommandoknappen på arket:
3. För att ersätta detta fel med ett vänligt meddelande, uppdatera koden enligt följande.
Vid fel GoTo InvalidValue:
Range ("H3"). Value = WorksheetFunction.VLookup (Range ("H2"), Range ("B3: E9"), 4, False)
Avsluta Sub
InvalidValue: Range ("H3"). Value = "Not Found"
Resultat när du klickar på kommandoknappen på arket:
Obs! Besök vår sida om felhantering för att lära dig mer om detta ämne.