Can the following macro be adjusted to NOT clear the 1st rows of pages 1, 5,
7 and 8? This is where the headers are, and they are used in other formulas.

Thanks.

M.A.Tyler.

Sheets("Sheet7").Select
Cells.Select
Selection.ClearContents
Sheets("Sheet8").Select
Cells.Select
Selection.ClearContents
Sheets("Sheet5").Select
Cells.Select
Selection.ClearContents
Sheets("Sheet1").Select
Range("P245").Select