Range/Select Zelleninhalt löschen
20.07.2004 14:32:17
Marc
ich möchte in allen Arbeitsblättern, außer in dem was Übersicht heißt, die Zellen E! bis E65000 löschen. Das wollte ich mit
dem folgenden Code machen, allerdings klappt das aus irgendwelchen Gründen nicht.
Es wird immer im Übersichtsblatt die Zelle E1 gelöscht.
Würde mich freuen, wenn sich das mal jemand ansehen könnte.
For Each objBlatt In ActiveWorkbook.Worksheets
If objBlatt.Name "Übersicht" Then
Range("E1, E65000").Select
Range("E1, E65000").Value = ""
End If
Next
Gruß
Marc