Input boxes - writing entry to cell

[Janet H]

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

 

[Bob Phillips]

Range("h14").Value = myNum

--

HTH

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

 

[Karthik Bhat - Bangalore]

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