Hi all,
I have this code that I would like to simplify.
R1C1 has formula, ="A"&Max(A2:A50).
Sub Macro1() Application.Goto Reference:="R1C1" Selection.Copy Application.Goto Reference:="R20C1" End Sub
Tried something likebut wont work.Application.Goto Reference:=Range("K4800").Value
If can enter the formula in the code is better.
Thank you.
What do you want to do finally?
Copy the formula from one cell to another?
If you want to enter a formula try
Range("A1").Formula = "=""A"" & MAX(A2:A50)"
Last edited by PCI; 09-01-2014 at 08:27 AM. Reason: Typo
- Battle without fear gives no glory - Just try
Nope, I want to enter formula into goto code (ctrl + g).
When A1 cell value is A20 and when click the macro, it would go there.
As you can see the macro provide by me dont work because
keeps changing.Application.Goto Reference:="R20C1"
So to summarize, you want a macro to go where the active cell is mentioning the cell to go to, is it?
If A1 content is A20, if A1 is the active cell, when firing the macro you want to go to A20!
If yes try
Sub GogoPerso() Range(ActiveCell.Value).Select End Sub
Last edited by PCI; 09-01-2014 at 08:34 AM.
After study, your code. I dont have to use goto. Just select is ok.
Appreciate your help. Thank you.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
DavidRoger 
Register To Reply
Bookmarks