To return the first cell in a selection:

dim firstCell as range
set firstCell = selection.cells(1)
msgbox firstCell.address

for the last cell:

dim lastCell as range
with selection
set lastcell = .cells(.cells.count) 'note the period in front of cells
end with
msgbox lastcell.address

Bob Flanagan
Macro Systems
Delaware, U.S. 302-234-9857
http://www.add-ins.com
Productivity add-ins and downloadable books on VB macros for Excel


"rohnds " wrote in message
...
I have a spreadsheet with data in column A starting from A5 ... list of
my pH reading for my aquarium. I also have a chart graphing this data.
Right now my data start at A5 and end at A11.

Right now I have created a macro in VB that allow me input the last
cell of my data (example A12, A15), and then used that range (e.g.
A5:A15, if I entered A15) to update my graph.

I was wondering if anyone knew how to retrieve the range using VB of
the selected cells. Another word, I want VB to return startig range A5
and ending range A15 if I selected A5:A15. I can then use that info to
update my chart thus giving me more flexibility.

Any help would be appreciated.


---
Message posted from http://www.ExcelForum.com/