On 2002-03-12 05:02, Matt wrote:
Thanks James
Do you have any ideas why the following code is not working. Obviously, I'm doing something completely wrong but cannot work out what.
Set myrange = Worksheets("Sheet3").Range(ActiveCell, Worksheets("Sheet3").ActiveCell.End(xlDown).Offset(0, 2))