Clever-Excel-Forum

Guten Morgen zusammen,

ich nehme mir seit gestern das Leben mit einem Makro. Zugegeben, ich bin ein blutiger Anfänger was Makro´s angeht. Ich hoffe jemand hat eine Lösung für mich. Smile

Die Idee ist eigentlich relativ simpel, nur die Umsetzung kompliziert.

Folgendes Problem stellt sich mir:

Siehe Bild: ich würde gerne, wenn in Spalte H, kein Text steht, die komplette Zeile löschen und natürlich nach oben verschieben. Wenn etwas in Spalte H steht, dann soll diese Zeile auch bestehen bleiben. Würde das Makro gerne auf einen Button legen.

Ich hoffe jemand hat eine Idee und bestenfalls auch den Code für mich?

[attachment=46691]

Vielen Dank vorab an alle.

Hei,

damit sollte es gehen, nicht getestet, weil es keine Beispieldatei gibt.

PHP-Code:
Option Explicit

Sub Löschen()
    Dim lZeile As Long
    For lZeile = 9 To 4 Step -1
        If Cells(lZeile, "H") = "" Then
            Rows(lZeile).Delete Shift:=xlUp
        End If
    Next lZeile
End Sub 

Hallo

Bereich(Range) anpassen.

Code:
Public Sub test()

Range("H4:H20").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

End Sub

Gruß Elex

Perfekt. Funktioniert super. Ich danke Euch! Smile

jannik.e97

HubertK

Elex

jannik.e97