FreezePanes Property Example

This example removes any frozen panes from the active worksheet.

Set c = Spreadsheet1.Constants
If Spreadsheet1.ActiveSheet.FreezePanes Then _
    Spreadsheet1.Range("a1").FreezePanes c.ssFreezeNone