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 using

Cells(r,c).Select



--

Regards,
Nigel
(E-Mail Removed)



"SpeeD" <(E-Mail Removed)> wrote in message
news:2527A533-5223-45FA-89F3-(E-Mail Removed)...
> 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
--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(E-Mail Removed)
"SpeeD" <(E-Mail Removed)> wrote in message
news:2527A533-5223-45FA-89F3-(E-Mail Removed)...
> 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

Thnsks Nigel!

Works great!

SpeeD

"Nigel" wrote:

> Try using
>
> Cells(r,c).Select
>
>
>
> --
>
> Regards,
> Nigel
> (E-Mail Removed)
>
>
>
> "SpeeD" <(E-Mail Removed)> wrote in message
> news:2527A533-5223-45FA-89F3-(E-Mail Removed)...
> > 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
>
>