Excel - Makro Fehlermeldung

Kristina_36 · 24. Oktober 2017

Hallo zusammen

Ich habe dank eurer Hilfe mal dieses Makro geschrieben. Es soll Spalten löschen, wenn in Spalte I der Wert doppelt vorkommt.

Ich bekomme nun immer eine Fehlermeldung, die mir das "End If" markiert.

Kann mir jemand sagen, wo mein Fehler liegt?

Sub DoppelteLöschen()
Dim LRow As Long, i As Long
With Sheets("Übersicht")
LRow = .UsedRange.Rows.Count
For i = LRow To 2 Step -1
If .Range("I" & i) <> "" And _
Application.CountIf(.Range("I2:I" & i), .Range("I" & i)) > 1 Then
.Rows(i).Delete
End If
Next
End With
End Sub

Herzlichen Dank im Voraus

Kristina

Robert Ha.

Hallo Andreas,

die von dir genannte Fehlermeldung weisst auf ein Makro hin das Excel 2010 nicht verarbeiten kann.

Oeffne die Datei und druecke Alt+F11 und ueberpruefe dort das Makro bzw. entferne es dort.

Gruss,

Robert

Kristina_36

Hallo Claus,

vielen Dank für deine Hilfe.

Das merkwürdige ist, dass ich mit dem selben Makro in anderen Dokumente auch keine Probleme habe. Nur in dem einen bekomme ich die Fehlermeldung.

Bei deiner neuen Variante ist das Problem, dass auch hinterlegte Formeln in leeren Zellen dazu führen, dass alle Zeilen gelöscht werden, in denen eine Formel für spätere automatische Vervollständigung hinterlegt ist. Diese Felder sind noch leer, befüllen
sich aber, wenn in einer anderen Tabelle etwas eingetragen wird. Es ist also mit dem anderen Excel Dokument verknüpft.

Gibt es eine Möglichkeit, das die "leeren" Zellen mit Formeln nicht als doppelte gewertet und auch nicht gelöscht werden?

Herzlichen Dank und Gruß

Kristina

Claus Busch

Hallo Kristina,

bei mir funktioniert dies ohne Probleme.

Wenn es egal ist, ob von oben oder unten gelöscht wird, kannst du es auch so probieren:

Sub DoppelteEntfernen()Sheets("Übersicht").UsedRange.RemoveDuplicates Columns:=9, Header:=xlyesEnd Sub

Claus

Andreas Killer

Das merkwürdige ist, dass ich mit dem selben Makro in anderen Dokumente auch keine Probleme habe. Nur in dem einen bekomme ich die Fehlermeldung.

Mach den VBA Editor auf, Fenster maximieren, lass das Makro laufen und wenn der Fehler kommt machst Du einen Screenshot vom ganzen Bildschirm und postest den hier.

Ich hab da so eine Vermutung...

Andreas.

54 69 6d

Danke für die schnelle Antwort.
Ich habe eben bei mir eine leere Excel Datei erstellt und dort einen Button mit einem Makro, welches einfach nur eine Zelle befüllt.
Das hat funktioniert. Mache ich das gleiche in der Kopie, welche mir mein Kollege geschickt hat funktioniert es nicht.
Leider ohne Fehlermeldung.
Wenn der Kollege eine neue Excel Datei erstellt und das selbe versucht funktioniert es auch nicht.
Was ich eben noch versucht habe war die Datei einmal als normale Excel Datei zu speichern und dann als Makro Excel.
Hat leider auch keinen Unterschied gemacht.
VG Tim

Hi,

willkommen im Windows Forum!

Excel - Makro Fehlermeldung - Similar Threads - Excel Makro Fehlermeldung	Forum	Datum
Excel Makro Excel Makro: Hallo zusammen,gibt es die Möglichkeit folgenden Sachverhalt in einem Makro abzubilden?Sachverhalt:1. Zelle A2 kopieren2. beim nächsten Ausführen des selben Makros auf Zelle A3 springen und diese...	Microsoft Office	19. Oktober 2022
Excel Makro Excel Makro: Hallo und guten Tag Ich habe bei support.microsoft.com ein Beispiel zum Löschen leerer Zeilen in einem Excel-Arbeitsblatt gefunden. Aus Diesem habe ich das folgende Makro gemacht. Sub Makro6 '...	Microsoft Office	20. November 2020
Excel Makro Excel Makro: Ich möchte nur die Zellen in "C" löschen die in "B" rot unterlegt sind. Die Spalte "D" soll nicht berücksichtigt werden. Wie kann ich das im Makro integrieren? Sub Bereinigen Dim LRow As Long...	Microsoft Office	3. März 2020
Excel Makro Excel Makro: Hallo zusammen, ich würde gern in eine Excel Datei ein Makro einfügen, welches eine komplette Zeile in ein anderes Blatt verschiebt, sobald in einer Spalte das Wort "Erledigt" vorkommt. In dem...	Microsoft Office	11. Dezember 2019
Excel Makro Excel Makro: Guten Tag liebe Comminity, ich erstelle gerade eine Excel-Datei und benutze zum Einfügen Makros. Ich habe welche zum Einfügen und zum Löschen. Ich möchte gerne da wenn man etwas mit einem Makro...	Microsoft Office	10. April 2018
Excel Makro Excel Makro: Ich habe in meiner Excel Liste ein Makro erstellt welches auf Druck auf den button eine neue Zeile erstellt und gleichzeitig den Blattschutz aufrecht erhält. Dieses Makro funktioniert eigentlich...	Microsoft Office	26. September 2017
Excel Makro Excel Makro: Ich habe eine Excel Tabelle. Die Tabelle hat Werte in den Spalten A-T. Täglich lese ich neue Daten in die Anwendung für die Spalten A-H und sortiere dann die Tabelle nach Spalte B. Nach dem...	Microsoft Office	7. Januar 2017

Excel - Makro Fehlermeldung