address of activecell in another sheet
Not only :)
Quite funny and useless Worksheet function:
Function ACEll() As String
Application.Volatile (True)
Dim s As Worksheet
Set s = ActiveSheet
ActiveWorkbook.ActiveSheet.Select
ACEll = ActiveSheet.Name + "!" + ActiveCell.Address()
s.Select
End Function
Try - this really works :)
Henn
"Stefi" kirjutas sõnumis
...
Thanks! I was not specific enough, I hoped that there is a simpler way
than
that. I'm satisfied because there is not an additional lack of my
knowledge.
Stefi
€žGary''s Student€ť ezt Ă*rta:
Sub get_it()
Set whereami = ActiveSheet
Sheets("Sheet2").Activate
MsgBox (ActiveCell.Address)
whereami.Activate
End Sub
--
Gary''s Student - gsnu200771
|