Hello Steph,

By setting an object variable to equal the active cell, you can derive
all the information you want like this...

Dim Addx As String
Dim Rng As Range
Dim WksName As String
Dim WkbName As String

Set Rng = ActiveCell

Addx = Rng.Address
WksName = Rng.Parent.Name
WkbName = Rng.Parent.Parent.Name

Sincerely,
Leith Ross


--
Leith Ross

Sincerely,
Leith Ross

'The Code Cage' (http://www.thecodecage.com/)
------------------------------------------------------------------------
Leith Ross's Profile: http://www.thecodecage.com/forumz/member.php?userid=75
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=108727