Does any one knows why this is not working?


Private Sub ComboBox1_Change()
if me.combobox1.value = "value1" then
With Me.ComboBox1.TopLeftCell
..Offset(0, 5) = "NIN"
..Offset(0, 6) = "NOUT"
..Offset(0, 7) = "IND"
..Offset(0, 8) = "TITLE"
..Offset(0, 9) = "CASE"
End With
else
With Me.ComboBox1.TopLeftCell
..Offset(0, 5) = "something"
..Offset(0, 6) = "else"
..Offset(0, 7) = "more"
..Offset(0, 8) = "ofmy"
..Offset(0, 9) = "stuff"
End With

End Sub


Any Help Greatly appreciated.
Do I need an End If somewhere?