determine activecell and move to it after running ohter sub...

  • Thread starter Thread starter SpeeD
  • Start date Start date
S

SpeeD

Hi.

I need to determine the activecell at some point and move to it after other
sub as run. how can i do this? i´ve tried the following without success...

r = ActiveCell.Row
c = ActiveCell.Column


Run "Formatar_fundo_original"
Range(c & r).Select

Thanks
SpeeD
 
try this idea

Sub gobacktocell()
Dim myadd As String
mysht = ActiveSheet.Name
myrng = ActiveCell.Address
Application.Goto Sheets("sheet4").Range("a1")
MsgBox "hi"
Application.Goto Sheets(mysht).Range(myrng)
End Sub
 
Back
Top