VBA Code verändern - ohne Duplikate

Computer: Software & Programmierung Office Software
1

Hi,
wie kann man diesen Script, welches nach dem Alphabet sortiert, noch verändern, daß er ohne „ohne Duplikate“ alphabetisch sortiert?

Option Explicit
Dim strOldSelection As String
Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Column = 1 And ActiveCell.Row >= 10 And ActiveCell.Row

2

Hallo Xen55

habe die Schleifen zum entfernen der Duplikate vor dem Sortiervorgang eingefügt und den Code um einige „Select’s“ bereinigt.

Option Explicit
Dim strOldSelection As String
Private Sub Worksheet\_Change(ByVal Target As Range)
 Dim rngBereich As Range, i As Long, j As Long
 If ActiveCell.Column = 1 And ActiveCell.Row \>= 10 And ActiveCell.Row 
Gruß
Franz


> <small>[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]</small>
3

Danke
Danke für die super Hilfe.

MFG
Xen55