View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
mohavv mohavv is offline
external usenet poster
 
Posts: 68
Default goto function in macro 2

On Jan 21, 7:48*pm, ShaneDevenshire
wrote:
Hi,

Try:

Sub GoToIt()
* * It = Mid([A1].Formula, 2, 99)
* * Range(It).Activate
End Sub

Your problem is that the first character in the formula is "=". *The Mid
function above starts at the 2nd character instead.

--
Cheers,
Shane Devenshire

"mohavv" wrote:
Hi,


I probably didn't express myself enough, so I give it another try.


Casus:
sheet 1 cell A1 contains following: =sheet3!D19


I want to use GOTO (F5) with the contents of A1 to go to that cell


I thought this would do it, but unfortunately not.


Sub Macro1()


Dim tmp As String


tmp = Range("a1").Formula


Application.Goto Reference:=tmp


End Sub


When I add this the A4 text becomes: text =sheet3!D19


* * Range("A4").Formula = "text " & tmp


What am I doing wrong?


Cheers,


Harold


Unfortunately not the answer.
Same problem

I work with Excel 2007, FYI

As soon as you type the short code like "it" it doesn't work.
If you type the text itself it work fine.

Cheers,

Harold