Functie Vlookup gebruiken in Oulook

[Newbie09]

We willen informatie die in excel bestand staat inlezen in een textbox van een userform in outlook.

De bedoeling is om de functie Vlookup te gebruiken waarbij je een waarde geef die vervolgens wordt gezocht in een excel-bestand. Hieronder staat een simple versie hoe ik de code geschreven heb, maar hij werkt niet. (ik krijg een error 1004: klass WorksheetFunction kan niet worden opgehaalt).

versimple versie van de code:
Set rechtsOnder = Cells(aantalTotaal, 2)
Set linksboven = Range("A1")
Excel.ActiveWorkbook.Names.Add "gebied", Worksheets("projecten").Range(linksboven, rechtsOnder)
rij_nr = Excel.Application.WorksheetFunction.VLookup("209158", Range("gebied"), 2, False)
TextBox2.Text = rij_nr


Wie kan mij helpen om dit probleem op te lossen.

Newbie09,

 

[Newbie09]

Oplossing!

Met een beetje gekloot ben ik erachter gekomen dat de functie VlookUp waarbij je een via een waarde laat zoeken in een excel-bestand alleen werk als het een getal is.

Oplossing:
als je hem via een textbox laat uitlezen het als tekst:
getal = TextBox1.Value wordt getal = "070709"
Om er een getal van te maken:
getal = TextBox1.Value + 1 - 1 wordt getal = 070709
TextBox2 = Excel.Application.WorksheetFunction.VLookup(getal, Range("gebied"), 3, False)

In mijn situatie is het hiermee opgelost en dit is ter informatie voor andere die hetzelfde probleem hebben.

Newbie,