doppelte bedingungen (mathem.)->problem!!
31.07.2003 11:20:24
kerbi
hab da ein problem, welches wahrscheinlich simpel zu lösen ist...
irgendwie gibt's da ein problem mit den doppelten bedingungen. wie ist das lösbar?
danke vielmals
kerbi
auszug:
Sub Benchmarklaufzeit()
Dim Restlaufzeit As Double
Dim RestLZ As String
Restlaufzeit = ActiveSheet.Cells(7, 5).Value
If 1 <= Restlaufzeit < 3 Then
RestLZ = "1-3 yr"
ElseIf 0 > Restlaufzeit Then
RestLZ = "unterjährig"
ElseIf 3 <= Restlaufzeit < 5 Then
RestLZ = "3-5 yr"
ActiveSheet.Cells(7, 7).Value = RestLZ
End If
End Sub