Ich hab mal wieder ein Problem bei dem ich trotz langer recherche keine Lösung finde.
Ich habe eine Combobox auf einem UserForm mit 2 Spalten (ColumnCount = 2). In dieser Combobox möchte ich folgendes angezeigt bekommen:
- 1. Spalte der Combobox = Spalte D der Zeilen 4 bis 19 und 24 bis 43
- 2. Spalte der Combobox = Spalte F der Zeilen 4 bis 19 und 24 bis 43
Den oberen Zeilenbereich habe ich schon hinbekommen. Wie bekomme ich den 2. Zeilenbereich (Zeilen 24 bis 43) in den Code?
Private Sub UserForm_Initialize()
With ComboBox2
For a = 4 To 19
.AddItem ActiveSheet.Cells(a, 4) & " " & ActiveSheet.Cells(a, 6).Value
Next a
End With
End Sub
Danke fürs lesen und die Hilfe!mfg, Andreas