change User Form Labels based on combo box

[raccoon588]

I have a user form with a combo box that has a mist of dates. When the user selects the date i would like the labels to change.


EX: the user selects 6/18/2018 and the labels change to 6/18/2018, 6/19/2018, 6/20/2018 etc.
EX: the user selects 6/25/2018 and the labels change to 6/25/2018, 6/26/2018, 6/27/2018 etc.






is there some code that will make this happen?

 

[Nine Zero]

maybe something like this

Private Sub ComboBox1_Change()
Label1.Caption = ComboBox1.Value
Label2.Caption = ComboBox1.Value + 1
Label3.Caption = ComboBox1.Value + 2
'and so on
End Sub

 

[raccoon588]

this is perfect. is there a way to format it as short text rather then the number?

 

[Nine Zero]

maybe try this

Label1.Caption = Format(ComboBox1.Value, "Short Date")
'and so on

EDIT: when you say "number" what numbers were you getting? the result should be a date correct?