ich versuche vergeblich diese zwei Zeilen so umzuschreiben, dass nicht die Spaltenzahl sondern der definierte Name aus dem Tabellenblatt angesprochen wird.
Viellecht kann mir jemand dabei helfen.
Ich würde hier gerne die "65" gegen einen definierten Namen ersetzen.
lastcell1 = Worksheets(sheet1).Cells(Rows.Count, 65).End(xlUp).Row
Und hier die "61" bzw. die "3"
If Worksheets(sheet1).Cells(z, 61) = Worksheets("PT").Cells(y, 3) Then
Vorab vielen dank
Gruß
Stefan