Selecting a cell and changing the number.

[gjsala]

I'm trying to write a part of a program that will allow the users to select a cell on a spreadsheet and in the process change the number in the cell that has been selected with their own input. Here is the following code:
CODE.....
ans = Application.InputBox("Type in the cell you wish to_ change.", Cell)
ActiveCell = ans
inp = InputBox("Type in the new number.", Cell)
inp = ActiveCell
CODE...
The cells ranges differ as each sheet is created.
If you have any questions, please let me know. Thanks in advance!

 

[VBAjedi]

So what's your question?

VBAjedi

 

[gjsala]

VBAjedi,

My question is when I execute this code (above) it doesn't change the cell I want to change on the spreadsheet, even though I input the number into the "input box". Is there something I'm missing?

Thanks.

 

[SkipVought]

ans = Application.InputBox("Type in the cell you wish to_  change.", Cell)
inp = InputBox("Type in the new number.", Cell)
range(ans).value = inp

I gave this to you in another thread!

Skip,
Skip@TheOfficeExperts.com

http://www.TheOfficeExperts.com