Bereich auf Inhalt prüfen

Bild

Betrifft: Bereich auf Inhalt prüfen von: Hartmut_M
Geschrieben am: 10.03.2005 12:53:03

Hallo, ich möchte in einem bestimmten Bereich (C3:S370) alle Zelleninhalte löschen die nicht gleich "UR" oder "GL" sind. Kann mir jemand sagen, wie ich dies am besten bewerkstellige?
Vielen Dank im Voraus.
Hartmut

Bild


Betrifft: AW: Bereich auf Inhalt prüfen von: c0bRa
Geschrieben am: 10.03.2005 12:58:57

hallo...

ungetestet würd ich sagen:
Sub Bereichloeschen()
dim i as range
for each i in Range("c3:S370")
if i.value <> "UR" and i.value <> "GL" then i.ClearContents
next
End Sub



Das Forum lebt auch von Rückmeldungen...
c0bRa


Bild


Betrifft: AW: Bereich auf Inhalt prüfen von: Hartmut_M
Geschrieben am: 10.03.2005 13:04:47

Hallo, vielen Dank Euch Beiden.
Genau diese Befehle habe ich gesucht.
Hartmut


Bild


Betrifft: AW: Bereich auf Inhalt prüfen von: Uduuh
Geschrieben am: 10.03.2005 13:00:43

Hallo,

for each c in Range("C3:s370").Cells
If not(c="UR" or c="GL") Then c.Clearcontents
next c

Gruß aus'm Pott
Udo



 Bild

Beiträge aus den Excel-Beispielen zum Thema "Bereich auf Inhalt prüfen"