Hi,

Might as well throw my variation into the mix:

Sub FreezePanes()
Dim sh As Worksheet
For Each sh In Worksheets
sh.Activate
[D6].Select
ActiveWindow.FreezePanes = True
Next sh
End Sub

--
Thanks,
Shane Devenshire


"mastersparky" wrote:

I have an excel 2003 spreadsheet with 215 identical pages - is there a macro
or formula to set the freeze pane function on all of them? The cell that
would need to be selected would be D6 on sheets1 to 215... Any help or
insight would be greatly appreciated

Thanks

mastersparky