Select case
13.05.2005 11:12:44
Gregor
Ich habe ein Problem mit mit Select Case. Bei einem Wert < 20 nimmt die Select Case-Methode >= 55 (GoTo MP55). Wieso?
Schritt 1 --> Einlesen in ListBox wie folgt
Sub cboHöhenFüllen()
With Me.cboHöhen
.AddItem 55
.AddItem 45
.AddItem 40
.AddItem 35
.AddItem 30
.AddItem 25
.AddItem 20
.AddItem "< 20"
.ListIndex = "0"
End With
End Sub
Schritt 2 --> Select Case-Methode
Select Case Wert
Case Is >= 55
GoTo MP55
Case 45 To 54
GoTo MP45
Case 40 To 44
GoTo MP40
Case 35 To 39
GoTo MP35
Case 30 To 34
GoTo MP30
Case 25 To 29
GoTo MP25
Case 20 To 24
GoTo MP20
Case Is < 20
GoTo kleinerMP20
End Select
Kann mir jemand weiterhelfen. Vielen Dank
Gregor