delete range wenn Zelle leer ist

Bild

Betrifft: delete range wenn Zelle leer ist von: Robert
Geschrieben am: 08.04.2005 13:15:32

Hallo,

Ich bin mal wieder auf ein VBA Schwierigkeit gestossen. Folgende Code benützte ich im Moment und löscht ganze Zeilen wenn Zelle (i, 2) leer ist.

For i = 500 To 15 Step -1

If Cells(i, 2) = "" Then _
Cells(i, 2).EntireRow.Delete

Next i

Ich möchte aber aus bestimmten Gründen dass es nur eine bestimmte Range neben diese Zelle löscht.

(.Delete Shift:=xlUp?)

Ist dies etwas wo ihr mich helfen könnt?

Grüsse

Robert

Bild


Betrifft: AW: delete range wenn Zelle leer ist von: Lars
Geschrieben am: 08.04.2005 13:19:14

Hi,

Range(Cells(i, 2),Cells(i,10)).Delete shift:=xlUp

mfg Lars


Bild


Betrifft: AW: delete range wenn Zelle leer ist von: Robert
Geschrieben am: 08.04.2005 14:21:08

Hallo Lars,

Ich danke für deine Lösung. Ist genau Das was ich wollte.

Gruss

Robert


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Markierung nach drucken"