melisfreed,


Try

With Worksheets("data").Range(BHAddress & ":" & "G3000")

HTH

Charle

--
Charle
-----------------------------------------------------------------------
Charles's Profile: http://www.excelforum.com/member.php...nfo&userid=601
View this thread: http://www.excelforum.com/showthread.php?threadid=27575