Excel: zeilen löschen

Computer: Software & Programmierung Visual Basic
#1

versuche in excel mit hilfe eines makros folgende aktion durchzuführen: zeilen7 bis 50 und zeilen 67 bis 110 löschen wenn in spalte c und g leere zelle (resp. kein wert) - zusätzliches problem: in den zeilen hat es auch verbundene zellen

#2

versuche in excel mit hilfe eines makros folgende aktion
durchzuführen: zeilen7 bis 50 und zeilen 67 bis 110 löschen
wenn in spalte c und g leere zelle (resp. kein wert) -
zusätzliches problem: in den zeilen hat es auch verbundene
zellen

Hallo Grußlose®,

verbundene Zellen sind kein Problem *find* :smile:

Probier’s mal so:

Code in ein Standardmodul z.B. Modul1

Option Explicit

Sub Loesch()
On Error Resume Next
ActiveSheet.UsedRange.MergeCells = False
Intersect(Range(„C7:C50,C67:C110“).SpecialCells(xlCellTypeBlanks), _
Range(„G7:G50,G67:G110“).SpecialCells(xlCellTypeBlanks).Offset(0, -4)) _
.EntireRow.Delete
End Sub

Gruß
Reinhard