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

[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

 

[Nigel]

Try using

Cells(r,c).Select

 

[Don Guillett]

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

 

[SpeeD]

Thnsks Nigel!

Works great!

SpeeD

Try using

Cells(r,c).Select



--

Regards,
Nigel
(e-mail address removed)