ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   ActiveCell.Address to return non Absolute reference (https://www.excelbanter.com/excel-programming/422257-activecell-address-return-non-absolute-reference.html)

PCLIVE[_3_]

ActiveCell.Address to return non Absolute reference
 

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



Mike H

ActiveCell.Address to return non Absolute reference
 
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




JLGWhiz

ActiveCell.Address to return non Absolute reference
 
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




Gary''s Student

ActiveCell.Address to return non Absolute reference
 
Sub dural()
myAddress = ActiveCell.Address(rowabsolute:=False, columnabsolute:=False)
MsgBox (myAddress)
End Sub

--
Gary''s Student - gsnu2007k

PCLIVE[_3_]

ActiveCell.Address to return non Absolute reference
 
Thanks everyone.
That's what I was looking for.

Paul

"Gary''s Student" wrote in message
...
Sub dural()
myAddress = ActiveCell.Address(rowabsolute:=False, columnabsolute:=False)
MsgBox (myAddress)
End Sub

--
Gary''s Student - gsnu2007k




PCLIVE[_3_]

ActiveCell.Address to return non Absolute reference
 
By the way, I went with the following method:

ActiveCell.Address(0, 0)

Thanks again.


"PCLIVE @cox.net" <pclive<removeThis wrote in message
...
Thanks everyone.
That's what I was looking for.

Paul

"Gary''s Student" wrote in
message ...
Sub dural()
myAddress = ActiveCell.Address(rowabsolute:=False, columnabsolute:=False)
MsgBox (myAddress)
End Sub

--
Gary''s Student - gsnu2007k







All times are GMT +1. The time now is 04:13 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com