Zellen mit "X" löschen



Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Zellen mit "X" löschen
von: Georg
Geschrieben am: 03.07.2002 - 15:26:52

Hallo,

ich möchte in A1 bis AU65 alle Zellen mit Inhalt "X" per Makro löschen.
Meine VBA Kenntnisse sind sehr gering und meine Versuche dementsprechend auch nicht erfolgreich.

Für jede Hilfe bin ich dankbar.
Gruß;
Georg


nach oben   nach unten

Re: Zellen mit "X" löschen
von: André Mantz
Geschrieben am: 03.07.2002 - 15:32:49

Öhm, warum muss es denn ein Makro sein?
Ich würde die "Ersetzen"-Funktion nehmen, einfach als Suchbegriff ein x eingeben, das Ersetzen-Feld leer lassen und (GANZ WICHTIG!) ein Häkchen vor "Gesamten Zellinhalt vergleichen".

Gruß, André


nach oben   nach unten

Re: Zellen mit "X" löschen, VBA
von: Otto Ecker
Geschrieben am: 03.07.2002 - 15:37:26

Hallo Georg,

in ein allgemeines Modul:

Sub a()
Dim zelle As Range
For Each zelle In ActiveSheet.UsedRange
If zelle.Value = "x" Then
zelle.ClearContents
End If
Next
End Sub

anstelle des Usedrange kannst Du auch z.B Range("a1:AU65") verwenden.

Gruß Otto

nach oben   nach unten

Re: Zellen mit "X" löschen
von: Georg
Geschrieben am: 03.07.2002 - 15:39:28

Hallo, Andrè

durch die jeweiligen X werden in anderen Zellen (Jahreskalender)bestimmte Infos angezeigt. Ich möchte das entfernen der X Eingaben der Einfachheithalber mit einem Makro vornehmen.
Gruß;Georg


nach oben   nach unten

Re: Zellen mit "X" löschen, VBA
von: Georg
Geschrieben am: 03.07.2002 - 15:48:24

Hallo,Otto

herzlichen Dank. Klappt super.
Gruß; Georg


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Zellen mit "X" löschen"