Code somewhat works. Please help?
Change
If Range("b8").Value = 0.05 <= 0.09 Then Range("b10").Value = 0.1
to
If Range("b8")= 0.05 And Range ("b8") <= 0.09 Then....etc
BTW I recommend you reconsider the use of = and <=; what if b8 is 0.095?
--
Kind regards,
Niek Otten
"jsc3489" wrote in message
...
The Value of b10 is always 0.20 no matter what I do. I'm so close I can
taste
it, I think.
I need commission percentage (b10) to be chosen by profit percentage (b8)
This is what I have:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Parts
End Sub
Public Sub Parts()
If Range("b8").Value <= 0.04 Then Range("b10").Value = 0.05
If Range("b8").Value = 0.05 <= 0.09 Then Range("b10").Value = 0.1
If Range("b8").Value = 0.1 <= 0.14 Then Range("b10").Value = 0.13
If Range("b8").Value = 0.015 <= 0.19 Then Range("b10").Value = 0.15
If Range("b8").Value = 0.2 <= 0.24 Then Range("b10").Value = 0.17
If Range("b8").Value = 0.25 <= 0.29 Then Range("b10").Value = 0.18
If Range("b8").Value = 0.3 <= 0.34 Then Range("b10").Value = 0.19
If Range("b8").Value = 0.35 <= 0.44 Then Range("b10").Value = 0.2
If Range("b8").Value = 0.45 Then Range("b10").Value = 0.21
End Sub
--
I reject your reality and substitute my own.
Promote hydrogen - one of the best "clean" fuels there are!
|