Formating and Header coloring in VB script for summary sheet

[Nelson]

I have used this link to create a summary page

http://www.rondebruin.nl/summary.htm


That worked well, now another few follow up questions I am hoping someone
can help me with

How can I format the entire sheet to be center,center and shade the header
cells a light grey and bold them?

my header is set like this


Newsh.Range("A1:G1").Value = Array("Customer Number", "Renewal Quarter",
"Customer Name", "2007", "2008", "2009", "2010")


Another thing I want to add is a the filter option at the top with an
automatic filter for a column ascending.

Thanks in advance

 

[Gord Dibben]

With Newsh.Cells
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
End With
With Newsh.Range("A1:G1")
.Value = Array("Customer Number", "Renewal Quarter", _
"Customer Name", "2007", "2008", "2009", "2010")
.Interior.ColorIndex = 15
.Font.Bold = True
.AutoFilter
End With


Gord Dibben MS Excel MVP

 

[Nelson]

AWESOME! Thanks, one more question, how can I format column customer number
for customer numbering of " ###### " in the script as well?

Thanks