HTH
Beth
Microsoft MVP - Excel
>How do I change the layout so that alternating rows are different
>colors, such as maybe gray and white.
>Makes it easier on the eye to follow along when rows aren't close
>together.
Sub ShadeAlternateLines()
Dim iRow As Integer
For iRow = 2 To Range("A1").SpecialCells(xlLastCell).Row Step 2
Rows(iRow - 1).Interior.ColorIndex = xlNone
Rows(iRow).Interior.ColorIndex = 15
Next iRow
End Sub
Bill Manville
Oxford, England
Microsoft Excel - MVP
At the very least, this technique will give you a running start at your
desired look. You can, of course, format the results further.
Sincerely,
---
Robert Rosenberg
Microsoft MVP - Excel
----------------