combobox click event

[robertvdb]

I have a sheet where the user selects a particular month, through a combobox.

When he selects "January", then a Msgbox ("cold") should appear. And so on.

For some reason, the below code does not work:

Private Sub monthCombo_Click()
Dim montH As String

Select Case montH
Case January
MsgBox ("cold")
'and so on
Case July
MsgBox ("hot")
'and so on until December
End Select

End Sub

what is wrong here ?

 

[robertvdb]

yes, that would be OK I guess. Besides the fact that I need to declare montH as String

or is it ok to put at the beginning: Dim monthCombo.Value as String ?

 

[James006]

Glad you could fix your problem