Apply Same Formats To All Sheets But One

I'm trying to apply some settings to all sheets in my workbook except the first sheet called Total. For some reason, the settings are not applied to all sheets but simply stays on the sheet I select.

Also, how can I ensure the changes are only applied to the sheets: A, B, C, D etc. but not to Total?


Sub Test()

Dim ws As Worksheet

For Each ws In Worksheets

Cells.Select
With Selection.Font
.Name = "Calibri"
.Size = 8
Columns("H:H").Select
Selection.ColumnWidth = 35
Columns("I:I").Select
Selection.ColumnWidth = 12
Selection.NumberFormat = "#,##0.00"
Columns("J:J").Select
Selection.ColumnWidth = 12
Selection.NumberFormat = "#,##0.00"

End With