09.02.2023, 07:30
Hallo Zusammen,
warum komme ich mit der RemoveDuplicates-Methode nicht über die Spalte 52 hinaus? Bis dahin läuft sie durch.
Versuche ich aber mehr Spalten mit aufzunehmen, geht es nicht. Ab Spalte 53, beginnt die Bezeichnung mit B, als BA. Scheint kein Zufall zu sein, macht für mich aber kein Sinn.
Bekomme den Laufzeitfehler 5 "Ungültiger Prozeduraufruf oder ungültiges Argument"
Gibt es zudem eine elegantere Lösung die einzelnen Spalten aufzuführen? Muss nämlich bis 171 prüfen...
Hatte mal Dim arraytest(1 To 147, 150 To 171) As Variant probiert... aber wäre mittlerweile froh wenns überhaupt funktioniert.
ActiveSheet.Range("$A$3:$AZ$10000").RemoveDuplicates _
Columns:=Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52), _
Header:=xlYes
Vielen Dank im Voraus.
warum komme ich mit der RemoveDuplicates-Methode nicht über die Spalte 52 hinaus? Bis dahin läuft sie durch.
Versuche ich aber mehr Spalten mit aufzunehmen, geht es nicht. Ab Spalte 53, beginnt die Bezeichnung mit B, als BA. Scheint kein Zufall zu sein, macht für mich aber kein Sinn.
Bekomme den Laufzeitfehler 5 "Ungültiger Prozeduraufruf oder ungültiges Argument"
Gibt es zudem eine elegantere Lösung die einzelnen Spalten aufzuführen? Muss nämlich bis 171 prüfen...
Hatte mal Dim arraytest(1 To 147, 150 To 171) As Variant probiert... aber wäre mittlerweile froh wenns überhaupt funktioniert.
ActiveSheet.Range("$A$3:$AZ$10000").RemoveDuplicates _
Columns:=Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52), _
Header:=xlYes
Vielen Dank im Voraus.