Deswegen würden wir gern die Comboboxen so programmieren, dass sie die eingespeicherten Städte alphabetisch auflisten. Wir würden es gern vermeiden die Datenbank zu sortieren, da sonst unsere Rechnung durcheinander kommen würde.
Das ist der Quelltext unserer Comboboxen:
With Sheets("Daten")
combolist = WorksheetFunction.Transpose(.Range(.Cells(6, 2), .Cells(.Rows.Count, 2).End(xlUp)))
End With
'Vorbereitung der Comboboxen
With Sheets("Daten")
comAnzahl.List = WorksheetFunction.Transpose(.Range(.Cells(99, 10), .Cells(.Rows.Count, 10).End(xlUp)))
End With
Es wäre super, wenn einer die passende Antwort hätte.