I'm a total newbie to this. When the normal rate on the worksheet has to use
a substitute rate, I have an input box prompt for the substitute value. I
want the value to write to a certain cell to be used in a calculation. The
macro is doing what I want except writing the input value to the cell - H14.
What am I doing wrong?

ActiveSheet.Unprotect
Range("E14").Select
ActiveCell = "TTD Rate Override Applies"
myNum = Application.InputBox("Enter TTD Rate Override")
Range("h14").Select
ActiveSheet.Protect

Range("h14").Value = myNum

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Janet H" wrote in message
...
I'm a total newbie to this. When the normal rate on the worksheet has to
use
a substitute rate, I have an input box prompt for the substitute value.
I
want the value to write to a certain cell to be used in a calculation.
The
macro is doing what I want except writing the input value to the cell -
H14.
What am I doing wrong?

ActiveSheet.Unprotect
Range("E14").Select
ActiveCell = "TTD Rate Override Applies"
myNum = Application.InputBox("Enter TTD Rate Override")
Range("h14").Select
ActiveSheet.Protect

Hi Janet

Your code does not have the instruction to do what you want (input the
substitute value in cell H14). This code should take care of it:

ActiveSheet.Unprotect
Range("E14").Select
ActiveCell = "TTD Rate Override Applies"
myNum = Application.InputBox("Enter TTD Rate Override")
Range("h14") = my Num
ActiveSheet.Protect

Thanks
Karthik Bhat
Bangalore