Wie bring ich denn bei einer ComboBox die verschiedenen Auswahlpunkte rein?
Servus Sascha
Private Sub Workbook_Open() 'Code wird beim öffnen der Mappe ausgeführt
Dim Einträge As Range 'Variable bekannt machen
Set Einträge = Sheets(2).Range("A1:A6") 'Einträge aus dem Sheet 2 an die Variable übergeben
With Sheets(1).ComboBox1 'Combobox auf Sheet 1 ansprechen
.List = Einträge.Value 'Einträge aus dem Sheet 2 von A1 bis A6 ind die Combobox laden
.ListIndex = 0 'ersten Eintrag anzeigen
End With
End Sub