SpreadsheetGear 2017
FreezePanes Property (IWorksheetWindowInfo)
Example 






SpreadsheetGear Namespace > IWorksheetWindowInfo Interface : FreezePanes Property
Gets or sets the property which specifies whether window panes are frozen for the worksheet.
Syntax
'Declaration
 
Property FreezePanes As System.Boolean
'Usage
 
Dim instance As IWorksheetWindowInfo
Dim value As System.Boolean
 
instance.FreezePanes = value
 
value = instance.FreezePanes
System.bool FreezePanes {get; set;}
read-write property FreezePanes: System.Boolean; 
function get,set FreezePanes : System.boolean
__property System.bool get_FreezePanes();
__property void set_FreezePanes( 
   System.bool value
);
property System.bool FreezePanes {
   System.bool get();
   void set (    System.bool value);
}
Example
// Demonstrates creating a workbook with frozen panes
// using IWindowInfo.FreezePanes.
internal static void FreezePanes()
{
    // Create a workbook.
    SpreadsheetGear.IWorkbook workbook = SpreadsheetGear.Factory.GetWorkbook();
    SpreadsheetGear.IWorksheet worksheet = workbook.Worksheets[0];
    worksheet.Name = "Freeze Panes";
             
    // Split after column "C" (ScrollColumn is zero based).
    worksheet.WindowInfo.ScrollColumn = 2;
    worksheet.WindowInfo.SplitColumns = 1;
             
    // Split after row 2 (ScrollRow is zero based).
    worksheet.WindowInfo.ScrollRow = 1;
    worksheet.WindowInfo.SplitRows = 1;
             
    // Freeze the panes.
    worksheet.WindowInfo.FreezePanes = true;
             
    // Select the first non-frozen cell.
    SpreadsheetGear.IRange d3 = worksheet.Cells["D3"];
    d3.Select();
             
    // Enter some data in the frozen rows/cols.
    worksheet.Cells["C2"].Value = "Worksheet Title";
    worksheet.Cells["D2"].Value = "Column Title";
    worksheet.Cells["C3"].Value = "Row Title";
             
    // Enter some data in D3, format the cell, and unlock the cell 
    // so it can bew edited after setting worksheet.ProtectContents to true.
    d3.Value = "Edit Me";
    SpreadsheetGear.IFont font = d3.Font;
    font.Name = "Tahoma";
    font.Size = 16.0;
    font.Color = SpreadsheetGear.Colors.Blue;
    d3.Locked = false;
             
    // Autofit the columns.
    worksheet.UsedRange.Columns.AutoFit();
             
    // Auto size the columns.
    // Protect locked ce4lls.
    worksheet.ProtectContents = true;
             
    // Save the workbook.
    workbook.SaveAs(@"c:\FreezePanes.xls", SpreadsheetGear.FileFormat.XLS97);
}
' Demonstrates creating a workbook with frozen panes
' using IWindowInfo.FreezePanes.
Friend Shared Sub FreezePanes()
    ' Create a workbook.
    Dim workbook As SpreadsheetGear.IWorkbook = SpreadsheetGear.Factory.GetWorkbook()
    Dim worksheet As SpreadsheetGear.IWorksheet = workbook.Worksheets(0)
    worksheet.Name = "Freeze Panes"
             
    ' Split after column "C" (ScrollColumn is zero based).
    worksheet.WindowInfo.ScrollColumn = 2
    worksheet.WindowInfo.SplitColumns = 1
             
    ' Split after row 2 (ScrollRow is zero based).
    worksheet.WindowInfo.ScrollRow = 1
    worksheet.WindowInfo.SplitRows = 1
             
    ' Freeze the panes.
    worksheet.WindowInfo.FreezePanes = True
             
    ' Select the first non-frozen cell.
    Dim d3 As SpreadsheetGear.IRange = worksheet.Cells("D3")
    d3.Select()
             
    ' Enter some data in the frozen rows/cols.
    worksheet.Cells("C2").Value = "Worksheet Title"
    worksheet.Cells("D2").Value = "Column Title"
    worksheet.Cells("C3").Value = "Row Title"
             
    ' Enter some data in D3, format the cell, and unlock the cell 
    ' so it can bew edited after setting worksheet.ProtectContents to true.
    d3.Value = "Edit Me"
    Dim font As SpreadsheetGear.IFont = d3.Font
    font.Name = "Tahoma"
    font.Size = 16.0
    font.Color = SpreadsheetGear.Colors.Blue
    d3.Locked = False
             
    ' Autofit the columns.
    worksheet.UsedRange.Columns.AutoFit()
             
    ' Auto size the columns.
    ' Protect locked ce4lls.
    worksheet.ProtectContents = True
             
    ' Save the workbook.
    workbook.SaveAs("c:\freezepanevb.xls", SpreadsheetGear.FileFormat.XLS97)
End Sub 'FreezePanes '
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

IWorksheetWindowInfo Interface
IWorksheetWindowInfo Members
WindowInfo Property