This code won't output a value. It says error in value. I'm not sure what's wrong.
Function GearRatio(Gear As Double, Gear1 As Double, Gear2 As Double, Gear4 As Double, Gear5 As Double, Gear6 As Double)
If Gear = 1 Then
GearRatio = Gear1
If Gear = 2 Then
GearRatio = Gear2
If Gear = 3 Then
GearRatio = Gear3
If Gear = 4 Then
GearRatio = Gear4
If Gear = 5 Then
GearRatio = Gear5
If Gear = 6 Then
GearRatio = Gear6
End If
End If
End If
End If
End If
End If
End Function
Do you see any obvious problems?
Bookmarks