Wie man doppelte Lieder VBScript löschen . Benutzer haben die Möglichkeit, diese zu filtern und löschen Sie sie durch die Excel -Tools. Aber wenn eine Tabellenkalkulation lang und ständig ändert ist , können Sie ein kleines Visual Basic Script ( VBScript) nach Excel bekommen, um die doppelte Inhalte zu identifizieren und löschen Sie es schnell. Anleitung
1
Öffnen Sie das Datenblatt in Excel.
2
Presse "Alt " und " F11 ", um den Visual Basic -Editor zu öffnen .
3
Wählen Sie die Registerkarte "Einfügen" aus der oberen Symbolleiste und wählen
4
Fügen Sie folgenden Code in der Box, die erscheint "Module . ": " Option Explicit
< p > Sub DeleteDups ()
Dim x As LongDim LastRow As Long
LastRow = Range (" A65536 " ) . End ( xlUp ) . RowFor x = 1 To LastRow Step- 1Wenn Anwendung . WorksheetFunction.CountIf ( Range (" A1: A". & x ) , Range (" A" & x ) Text ) . > 1 ThenRange ("A" & x ) EntireRow.DeleteEnd IfNext x
End Sub "
5
Schließen Sie das Fenster , indem Sie auf das" X " in der oberen rechten Ecke .
6
Testen Sie die Funktion durch Hinzufügen von Daten zu Spalte A. Duplizieren einige der Daten bewusst .
7
Wählen Sie " Makros" aus der oberen Symbolleiste und wählen Sie " DeleteDups " und drücken Sie "Enter".