this may do what you want if you have a contiguous range of cells selected

Dim rng As Range
Set rng = Range(Selection.Address)

--


Gary


"Paputxi" wrote in message
...
I have a macro that I want to execute on the cells that I have selected on a
worksheet, that is, where 'Set myRng = Activesheet.Range(first selected cell:
last selected cell) or something like that. Any suggestions? Thanks in
advance