ich habe folgendes entspanntes Makro
Sub Zeilen_loeschen()
Dim loeschen As Double
For loeschen = Cells(Rows.Count, 3).End(xlUp).Row To 1 Step -1
If Cells(loeschen, 3).Value = "" Then
Rows(loeschen).Delete
End If
Next loeschen
End Sub
funktioniert, alles gut. Es wird durch ein Button auf dem entsprechenden Blatt ausgelöst. Wenn ich aber die komplette Datei auf einem anderen PC (Laptop) öffne, dann kommt der Laufzeitfehler 13 "Typen unverträglich"; als Fehlerquelle wird die Zeile >If Cells(loeschen, 3).Value = "" Then
Ideen?