Zell.Value = "j" oder "J"
24.07.2015 23:36:35
Juergen
ich versuche folgendes Makro für meine Zwecke zu nutzen.
Das Löschen klappt an und für sich gut, aber ich würde gerne den Löschbefehl bei Zell.Value "j" oder "J" auslösen (also egal, ob der Wert groß oder klein eingegeben wurde). Bislang klappt das nicht. Da gibt es doch bestimmt einen einfachen Code?
Danke vorab!
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim Bereich As Range
Dim Zelle As Range
Set Bereich = Worksheets("Eingangsrechnung").Range("A1:H60")
For Each Zelle In Bereich
If Zelle.Value = "j" Then
Zelle.ClearContents
End If
Next