Combobox Zelle in Arbeitsblatt steuern
21.09.2022 08:34:27
Oliver
nachdem ich nunmehr unzählige Einträge in der Recherche durchstöbert habe sowie andere Seiten durchstöbert habe und ich nicht fündig wurde, muss ich mich nun ans Forum wenden.
zum Verständnis würde ich gern erstmal meinen Aufbau darstellen.
Ich habe eine Tabelle ("tblDaten") die ich über Excel mit zwei Zellen filtere. Das funktioniert bereits gut.
In den Zellen werden jeweils ein Datum über eine Auswahlliste eingetragen (Datenüberprüfung). in der ersten Zelle der Monat des Datums und in der zweiten das Jahr des Datums.
Nun möchte ich gern diese Zellen über eine Userform(Combobox) steuern.
Habe bisher die Combobox füllen können aber bekomme es nicht hin diese direkt in die Zellen einzutragen.
Hier meine bisheriger Code dazu:
Private Sub UserForm_Initialize()
Me.cb_Jahr.List = Application.Transpose(Sheets("Stammdaten").Range("E3:E7").Value) 'Testcode/ Alternative
With Sheets("Stammdaten")
Me.cb_Jahr.RowSource = "'" & .Name & "'!E3:E7"
Me.cb_Monat.RowSource = "'" & .Name & "'!E8:E19"
End With
End Sub
' würde gern aus dem Datum nur das Jahr anzeigen(Combobox1-cb_Jahr) lassen dazu habe ich schon folgendes:
Private Sub cb_Jahr_Change()
' Hatte hier nen Code der aber 1905 eingetragen hat und der Comboboxeintrag ist eine 5 stellige Zahl (39458)
End Sub
ändere?
Vielen Dank im vorraus und Liebe Grüße
Oliver