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"