I have a named cell in B2. I want to clear all the data starting for
C2 onward down the columns. The following works if my cursor is on th
worksheet of the named cell.

Range("NamedCell").Offset(0, 1).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.ClearContents

How can I mod this so that I do not have to be on the sheet itself?

Thank-yo

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

Try the following:

With Range("NamedCell")
Range(.Offset(0, 1), .Offset(0, 1).End(xlToRight)).Clear
End With


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"ExcelMonkey " wrote
in message ...
I have a named cell in B2. I want to clear all the data
starting form
C2 onward down the columns. The following works if my cursor
is on the
worksheet of the named cell.

Range("NamedCell").Offset(0, 1).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.ClearContents

How can I mod this so that I do not have to be on the sheet
itself?

Thank-you


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

With Worksheets("Sheet1")
.Range(.Range("NamedCell").Offset(0, 1),
..Range("NamedCell").Offset(0, 1).End(xlToRight)).ClearContents
End With

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"ExcelMonkey " wrote in message
...
I have a named cell in B2. I want to clear all the data starting form
C2 onward down the columns. The following works if my cursor is on the
worksheet of the named cell.

Range("NamedCell").Offset(0, 1).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.ClearContents

How can I mod this so that I do not have to be on the sheet itself?

Thank-you


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