Maybe youo can assign the adress to a string and filter the string:

Dim AddressStr as string

Address = ActiveCell.Address

etc. etc.


--
Kaak
------------------------------------------------------------------------
Kaak's Profile: http://www.excelforum.com/member.php...fo&userid=7513
View this thread: http://www.excelforum.com/showthread...hreadid=387480