i use this code but errorFreeze panes is independent from one sheet to the next, so you can have freeze panes not set for sheets 1-5 and then set it for sheet 6 and onward to wherever you want it to be. Unfortunately you cannot select a group of sheets and set them all the same, as far as I know, so they need to be done individually.
Regards
Murray
Sub moFreeze()
Dim sh As Worksheet
Application.DisplayAlerts = False
For Each sh In Worksheets
If sh.Index > 5 Then
'With Sheets("Main")
With sh
If .FreezePanes Then .FreezePanes = False
.SplitColumn = 2
.SplitRow = 7
.FreezePanes = True
End With
End If
End If
Next sh
Application.DisplayAlerts = True
End Sub
Sub moFreeze()
Dim sh As Worksheet
Application.DisplayAlerts = False
For Each sh In Worksheets
If sh.Index > 5 Then
sh.Activate
With ActiveWindow
If .FreezePanes Then .FreezePanes = False
.SplitColumn = 2
.SplitRow = 7
.FreezePanes = True
End With
End If
Next sh
Application.DisplayAlerts = True
End Sub