Vlookup in Macro

[Jacob01]

In kolommen a en b staan gegevens. Kolom c is leeg.

Nu wil ik graag iets invullen in g3 wat gebruikt wordt om te zoeken in kolom a.

Als het item dan gevonden is moet hij vanaf de cel "offseten" en dan iets invullen

Heb hier gezocht maar er staan alleen complexere voorbeelden waar ik niks mee kan.

Heb tot nu toe deze code maar die geeft een foutmelding....

Range(Application.WorksheetFunction.VLookup("g3", "a2:b100", 2, (False))).Select
Selection.Offset(0, 3) = b

 

[Cobbe]

Sowieso staat er en fout in je formule:

Range(Application.WorksheetFunction.VLookup([COLOR="red"][[/COLOR]g3[COLOR="red"]], [[/COLOR]a2:b100[COLOR="Red"]][/COLOR], 2, False)).Select
Selection.Offset(0, 3) = b

Cobbe

 

[Wigi]

En de Select er vantussen:

Range(Application.WorksheetFunction.VLookup([COLOR="red"][[/COLOR]g3[COLOR="red"]], [[/COLOR]a2:b100[COLOR="Red"]][/COLOR], 2, False)).Offset(0, 3) = b

 

[Jacob01]

En de Select er vantussen:

Range(Application.WorksheetFunction.VLookup([COLOR="red"][[/COLOR]g3[COLOR="red"]], [[/COLOR]a2:b100[COLOR="Red"]][/COLOR], 2, False)).Offset(0, 3) = b

Hij geeft nog steeds een foutmelding.
Heb even het bestand bijgevoegd.

 

[Wigi]

VLookup geeft geen adres als resultaat, maar de inhoud van een cel.

Daarom:

[A2:A100].Find([g3]).Offset(, 4) = b

Wigi

 

[Jacob01]

VLookup geeft geen adres als resultaat, maar de inhoud van een cel.

Daarom:

[A2:A100].Find([g3]).Offset(, 4) = b

Wigi

Dear sir Giga Senior!
Hartelijk dank voor je hulp alweer!:thumb: