If Then statement

[Adam]

This is probably very simple.
I have a ComboBox with 10 choises. Is it possible to get theese
multipel choises down to a one line if statement. Something like this
(but working) :

If ComboBox1 = Choise1 or Choise2 of Choise3 Then
code
Else
code
End If

Cheers

Adam

 

[Jonathan West]

This is probably very simple.
I have a ComboBox with 10 choises. Is it possible to get theese
multipel choises down to a one line if statement. Something like this
(but working) :

If ComboBox1 = Choise1 or Choise2 of Choise3 Then
code
Else
code
End If

Select Case ComboBox1.ListIndex
Case Choice1, Choice2, Choice3
'code
Case Else
'code
End Select

Choice1, Choice2 and Choice3 should be the positions of the various items on
the list - the first item is indexed as zero. If you want to use the text
instead, then use ComboBox1.Text instead of ComboBox1.ListIndex and make the
choices strings.


--
Regards
Jonathan West - Word MVP
www.intelligentdocuments.co.uk
Please reply to the newsgroup
Keep your VBA code safe, sign the ClassicVB petition www.classicvb.org

 

[Adam]

Exactly what I needed, works like a dream.

Thank you so much.

Adam, Sweden