myAddress = ActiveCell.Address

This will return something like "$A$1".
Is there a way to have this return the non-absolute reference of "A1"
withoug having to use a worksheetfunction such as Substitute?

Thanks in advance.
Paul

Hi,

maybe

myAddress = ActiveCell.Address(0, 0)

Mike

"PCLIVE @cox.net>" wrote:

>
> myAddress = ActiveCell.Address
>
> This will return something like "$A$1".
> Is there a way to have this return the non-absolute reference of "A1"
> withoug having to use a worksheetfunction such as Substitute?
>
> Thanks in advance.
> Paul
>
>
>

Or:
myAddress = ActiveCell.Address(False, False)

Same thing as Mike's, except using the constant instead of the value.

"PCLIVE @cox.net>" wrote:

>
> myAddress = ActiveCell.Address
>
> This will return something like "$A$1".
> Is there a way to have this return the non-absolute reference of "A1"
> withoug having to use a worksheetfunction such as Substitute?
>
> Thanks in advance.
> Paul
>
>
>

Sub dural()
myAddress = ActiveCell.Address(rowabsolute:=False, columnabsolute:=False)
MsgBox (myAddress)
End Sub

--
Gary''s Student - gsnu2007k

Thanks everyone.
That's what I was looking for.

Paul

"Gary''s Student" <(E-Mail Removed)> wrote in message
news:8B8CDD01-5067-4D20-A012-(E-Mail Removed)...
> Sub dural()
> myAddress = ActiveCell.Address(rowabsolute:=False, columnabsolute:=False)
> MsgBox (myAddress)
> End Sub
>
> --
> Gary''s Student - gsnu2007k

By the way, I went with the following method:

ActiveCell.Address(0, 0)

Thanks again.


"PCLIVE @cox.net>" <pclive<removeThis> wrote in message
news:scS9l.89$(E-Mail Removed)...
> Thanks everyone.
> That's what I was looking for.
>
> Paul
>
> "Gary''s Student" <(E-Mail Removed)> wrote in
> message news:8B8CDD01-5067-4D20-A012-(E-Mail Removed)...
>> Sub dural()
>> myAddress = ActiveCell.Address(rowabsolute:=False, columnabsolute:=False)
>> MsgBox (myAddress)
>> End Sub
>>
>> --
>> Gary''s Student - gsnu2007k
>
>