Gary: Excel: Zelle abhängig von Inhalt Drucken

Beitrag lesen

Hi Leute,

Folgender Code:

Sub Do_Print()
'
' Do_Print Makro
'

'
    Range("D23").Select
    If D23 = "0.00" Then ("D23").Delete
    Range("D24").Select
    Range("D25").Select
    Range("D26").Select
    Range("D27").Select
    Range("D28").Select
    Range("D29").Select
    Range("D30").Select
    Range("D31").Select
    Range("D32").Select
    Range("D33").Select
    Range("D34").Select
    Range("D35").Select
    Range("D36").Select
    Range("D37").Select
    Range("D38").Select
    Range("D39").Select
    Range("D40").Select
    Range("D41").Select
    If D41 = 0# Then Delete D41
    Range("D42").Select
End Sub

Schritt Eins:
Eigentlich soll das Makro die Zellen D23 bis D42 überprüfen, ob dort 0.00 drin steht. Wenn ja Zelleninhalt löschen.

Schritt Zwei:
Dannach soll die Tabelle1 ausgewählt werden und gedruckt werden.