Hi

How do you select and copy the used range of a worksheet
named "calculations" with a permanent starting point of
cell "A14".

Thanks for you help guys.

Michael

Assume there will be something in cell A14
Dim rng as Range
With Worksheets("Calculations")
set rng = .Range(.cells(14,1),.Cells(rows.count,1).End(xlup) )
set rng = intersect(rng, .usedrange.EntireColumn)
End With
rng.copy

would be one guess.

--
Regards,
Tom Ogilvy

"michael" wrote in message
...

Hi

How do you select and copy the used range of a worksheet
named "calculations" with a permanent starting point of
cell "A14".

Thanks for you help guys.

Michael