Brauch mal Hilfe ! Code erweitern
19.08.2008 09:29:17
sockel939
Die letzte befüllte ist in J1000 und die letzte leere ( von unten gesehen ) in J488 jetzt soll der code wie (siehe unten) die letzte befüllte ermitteln und sie in die letzte leere kopieren.
Wie müsste der Code dann ausehen da ich nie weiß welche die letzte leere Zelle in J ist?
Sheets("Blatt1").Range("J65000").End(xlUp).Copy Destination:=Sheets("Blatt1").Range("J356")