Sverweis in Userform
04.03.2015 17:37:29
Stefan
ich habe folgendes Problem:
Ich möchte, dass in einer Userform eine TextBox via sverweis gefüllt wird, wenn eine andere Combobox gefüllt wurde.
Der zugehörige Code sieht folgendermaßen aus:
Private Sub ComboBox3_Change()
Dim box As String
Dim Matrix As String
box = ComboBox3.Value
Matrix = "Sheet1!" & "C6:H" & Worksheets("Sheet1").Cells(Rows.Count, 3).End(xlUp).Row
If box "" Then
'WorksheetFunction.VLookup(box, Matrix, 4, False)
TextBox11 = WorksheetFunction.VLookup(box, Matrix, 4, False)
Else
End If
End Sub
Laufzeitfehler '1004': Die VLookup-Eigenscahft des WorksheetFunction-Objektes kann nicht zugeordnet werden.
Ich bin hierbei leider mit meinem Latein am Ende und hoffe auf eure Hilfe.
vielen Dank schon mal.
Stefan
Anzeige