Daten löschen in unbekannter Zeile
28.01.2004 20:37:39
Werner
Range("Ziel").Select
ActiveCell.Offset(-1, 0).Activate
damit habe ich die Zelle aktiviert die über der Zelle "Ziel" liegt.
Nun muß ich die Eingaben (nicht aber die Formate) der nächsten 170 Zellen die links dieser Zelle liegen löschen.
ActiveCell.Offset(0, -1).Activate
ActiveCell.ClearContents
So,habe ich rausgekriegt,klappt es bei der ersten Zelle nach links;aber das kann ich doch nicht 170 mal eingeben.
Bin für eure Lösung sehr dankbar.
Gruß Werner