Hi,
Ik ben wat aan het oefenen met VLookup, maar ik krijg elke keer foutmelding 1004, en
"kl = Application.WorksheetFunction.VLookup(naam, myRange, 5, 0)" licht dan geel op.
Blijkbaar doe ik iets fout maar ik zie het niet. Hebben jullie een idee?
alvast bedankt Rob
Ik ben wat aan het oefenen met VLookup, maar ik krijg elke keer foutmelding 1004, en
"kl = Application.WorksheetFunction.VLookup(naam, myRange, 5, 0)" licht dan geel op.
Blijkbaar doe ik iets fout maar ik zie het niet. Hebben jullie een idee?
alvast bedankt Rob
Code:
Sub klantenLookUp()
Dim lr As Integer
Dim kl As String
Dim naam As String
Dim myRange As Range
Set myRange = Sheets("KlantData").Range("A:E")
naam = "Piet"
lr = ThisWorkbook.Sheets("KlantData").Cells(Rows.Count, 1).End(xlUp).Row
' kl = Application.WorksheetFunction.VLookup(naam, Sheet1.Range("A:E"), 4, False)
kl = Application.WorksheetFunction.VLookup(naam, myRange, 5, 0)
MsgBox lr
MsgBox myRange
MsgBox kl
End Sub