VLookUP
Andy
ich bräuchte noch einmal einen Tipp von Euch, bevor ich ganz verzweifle.
Habe einen SVerweis in VBA in einer Funktion umgesetzt und möchte diesen jetzt für jede Spalte ausführen. (Anzahl habe ich als Funktion definiert, die die gesamte Zeilenanzahl zurück gibt.
With wsNew
.Name = "Tabelle1"
For x = 2 To Anzahl
.Cells(x , 1) = Test(Sheets("Tabelle1").Range("A" & x))
Next x
End with
Public Function Test(sSuchtext As String) As String
Test = WorksheetFunction.VLookup(sSuchtext, Sheets("Daten").Range("$B$1:$C$600000"), 2, False) _
End Function
Fehlermeldung: VLookUp Eigenschaft Worksheet Funtion Objekts kann nicht zugeordnet werden
Schon einmal vielen Dank
Anzeige