folgendes Problem:
im Arbeitsblatt "Stammdaten" befindet sich eine Liste mit Daten(Spalten U:W).Die Anzahl der verwendeten Zeilen ist Variabel. Nun möchte ich 2 Spalten in der ComboBox anzeigen lassen. Die Anzahl der Spalten ist in den Eigenschaften auf 2 eingestellt.
Ich habe folgenden Skript geschrieben:
Private Sub Worksheet_Activate()
Dim s As Integer
s = 4
With Sheets("Stammdaten")
Do Until .Cells(s, 22).Value = ""
UserForm4.ComboBox1.AddItem .Cells(s, 22)
s = s + 1
Loop
End With
UserForm4.Show
End Sub
So bekomme ich aber nur die Daten der Spalte 22 angezeigt.
Wie bekomme ich nun die Spalte 23 dazu?
Danke für Eure Mühe im Voraus.
Wolfgang
aus dem Erzgebirge