Thread: Define Range Name
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Charles Charles is offline
external usenet poster
  
Posts: 1
Default Define Range Name

Wayne,

Or you could try this:


Dim sAddress As String
Sheets("DataList").Select
Range("A1:H1").Select
Range(Selection, Selection.End(xlDown)).Select
sAddress = ActiveWindow.RangeSelection.Address
Range(sAddress).Name = "Sheet1!rngTest"




Charle

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

Reply With QuoteReply With Quote