Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spalte nummerieren und sortieren nach 2 Kriterien

Spalte nummerieren und sortieren nach 2 Kriterien
06.07.2005 14:23:26
Regnar
Moin hatte das Problem schon eine Lösung bekommen, vielen Dank dafür aber in dem Gesamtprojekt funzt das nicht.
Ich möchte in Spalte a eine Nummerierung nach Artikelnummern aus Spalte B und Landzugehörigkeit nach Spalte D und das ganze dann auch noch sortiert, da alles über eine User Form eingegeben wird und die Nummer leider nicht nach reihenfolge kommen.
Bsp.
1 3547 BRD
leer 3547 BRD
2 4567 USA
3 4567 FRA
leer 4567 FRA
4 7890 BRD
leer 7890 BRD
5 7890 USA
Vielen Dank für eure Hilfe.
Schönen Gruß

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte nummerieren und sortieren nach 2 Kriterien
06.07.2005 14:53:27
u_
Hallo,

Sub nummerieren()
Dim n As Long, i As Long
i = 1
Application.ScreenUpdating = False
Range("A1").Sort Range("B2"), xlAscending, Range("D2"), , xlAscending, , , xlYes
For n = 2 To Range("B65536").End(xlUp).Row
If Cells(n, 2) & Cells(n, 4) <> Cells(n - 1, 2) & Cells(n - 1, 4) Then
Cells(n, 1) = i
i = i + 1
End If
Next n
Application.ScreenUpdating = True
End Sub
Gruß
Geist ist geil!
AW: Spalte nummerieren und sortieren nach 2 Kriterien
06.07.2005 15:11:54
Regnar
Vielen Dank U,
das klappt!!!
Anzeige

317 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige