Zeile loeschen.
17.02.2005 12:07:43
marc
wenn in Spalte ("H2:H50") keine Werte/Text stehen,dann
die gesamte Zeile loeschen.
Ich versuche den unten stehenden Code an die Beduerfnisse ,der Aufgabe zu anpassen ohne Erfolg.
marc :o)
For Each c In Range("H2:H30")
If c.Value = "" Then c.Delete Shift:=xlUp
Next c
End Sub