Die Listbox bereitet mir noch echt Probleme... :/
Ich habe mir eine Userform erstellt mit einer Listbox die mir die Monate anzeigt, sowie 2 Textboxen (von - bis). 2 Buttons zum Übernehmen und Abbrechen.
von in zelle AQ4
bis in Zelle AR4
Monatsliste im Breich AQ6:AQ19
Die Textboxen lesen beim starten der Userform das aktuell gewählte Datum aus. Die Listbox hab ich auch gefüllt bekommen. Das Auslesen ist aber sicherlich falsch für das wie ich es gern verwenden wollte.
Jetzt hätte ich noch gerne, das wenn man den Monat über die Listbox auswählt er das Anfangsdatum in AQ4 und das Enddatum in AR4 schreibt. Das ganze soll quasi als Vorlag dienen. Man soll in die Textboxen immer noch einen eigenen Zeitraum wählen können.
In dem Bereich AR6:AS19 stehen schon die Anfangs- und Enddaten.
Mein Code bisher^^
Private Sub UserForm_Initialize()
TextBox1.Value = Worksheets("Monatsübersicht").Range("Aq4")
TextBox2.Value = Worksheets("Monatsübersicht").Range("Ar4")
ListBox1.RowSource = "Aq6:Aq19"
End Sub
Private Sub cmbÜbernehmen_Click()
Unload UserForm5
End Sub
Private Sub cmbAbbrechen_Click()
Unload UserForm5
End Sub
Wäre schön wenn ihr mir helfen könntet!
Danke schon mal und ein frohes Fest