SVerweis VBA aber letzte Zelle unbekannt
Julia
steh vor einem für mich bisher noch unbekannten Problem.
Möchte einen SVerweis ausführen lassen (per VBA Makro) u die Größe der Tabelle ändert sich jedoch wöchentlich. Das heißt die Matrix wird nie ein 2tes mal A1:D300 z.B. heißen.
habe mir einen Lösungsansatz ausgedacht, jedoch bekomme ich als Ergebnis #Name.
Weiß jemand vielleicht woran das liegen könnte?
Sub SVERWEIS_AngelegtAm()
Dim letzteZeile As Long
'Letzte belegte Zeile in Spalte A
letzteZeile = Worksheets("Tabelle3").Range("A65536").End(xlUp).Row
With Worksheets("Aufgaben")
'.Range("I1").FormulaLocal = "=sverweis(B1;'Tabelle3'!A1:D5837;3;FALSCH)"
.Range("I1").FormulaLocal = "=sverweis(B1;'Tabelle3'!A1:D & letzteZeile;3;FALSCH)"
.Range("I1").AutoFill Destination:=Range("I1:I" & letzteZeile)
End With
End Sub
Anzeige