Thema Datum  Von Nutzer Rating
Antwort
19.01.2021 17:28:32 vukadonis
NotSolved
Blau Duplikate entfernen anderherum
 20.01.2021 00:56:48 xlKing
NotSolved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
20.01.2021 00:56:48		 Views:
245		 Rating:
     
Antwort:
  Ja
Thema:
Duplikate entfernen anderherum

Hi vukadonis,

kapier ich das richtig? Du willst nicht die ersten eindeutigen Werte behalten, sondern die letzten? Und alles was vorher doppelt ist muss raus? Probier mal folgendes. Vielleicht klappts ja so, wie du willst.

 For zeile = 2 To letzteZeile
     If WorksheetFunction.CountIf(Range("N2:N" & letzteZeile), Range("N" & zeile)) > 1 Then
            Rows(zeile).EntireRow.Delete
            zeile = zeile - 1
     End If
 Next

Gruß Mr. K.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
19.01.2021 17:28:32 vukadonis
NotSolved
Blau Duplikate entfernen anderherum
 20.01.2021 00:56:48 xlKing
NotSolved