Paul:

Since I only have a general idea of what you are doing, my comments are
general.

In general, you can look at the Name property of each sheet as you iterate
through all the sheets in the workbook to make sure the current sheet is not
Sheet1. For example:

Function Test()

Dim wks As Worksheet

For Each wks In ActiveWorkbook.Sheets
If wks.Name < "Sheet1" Then
'Code hear to paste cell range

End If
Next wks

End Function

If the name of Sheet1 is variable, you can examine the name of the sheet as
follows:

sSheet1 = ActiveWorkbook.Sheets(1).Name

--
David Lloyd
MCSD .NET
http://LemingtonConsulting.com

This response is supplied "as is" without any representations or warranties.


"Paul987" wrote in
message ...

I am trying to copy a range of cells (columns E:O) from sheet2 to all
remaining sheets in my workbook, the number and names of which will
vary. Sheet 1 needs to remain the same. I am able to do this for
*all * sheets, but am having difficulty forcing the macro to skip Sheet
1. Any help would be appreciated. Thanks


--
Paul987
------------------------------------------------------------------------
Paul987's Profile:
http://www.excelforum.com/member.php...o&userid=24850
View this thread: http://www.excelforum.com/showthread...hreadid=383977