SpreadsheetGear 2012
Insert(InsertShiftDirection) Method
Example 






SpreadsheetGear Namespace > IRange Interface > Insert Method : Insert(InsertShiftDirection) Method
Specifies whether to shift cells right or down.
Inserts cells, rows or columns by shifting cells right or down and fixing up formulas and formats.
Syntax
'Declaration
 

Overloads Sub Insert( _
   ByVal shiftDirection As InsertShiftDirection _
) 
'Usage
 

Dim instance As IRange
Dim shiftDirection As InsertShiftDirection
 
instance.Insert(shiftDirection)
procedure Insert( 
    shiftDirection: InsertShiftDirection
); 
function Insert( 
   shiftDirection : InsertShiftDirection
);

Parameters

shiftDirection
Specifies whether to shift cells right or down.
Example
using System;
using SpreadsheetGear;
using SG.Diagnostics;
             
namespace SpreadsheetGear.InsertExample
{
    class Program
    {
        static void Main()
        {
            // Create a workbook.
            IWorkbook workbook = Factory.GetWorkbook();
            IWorksheet worksheet = workbook.Worksheets[0];
            IRange cells = worksheet.Cells;
             
            // Set some text in A1:B2.
            cells["A1"].Formula = "A1";
            cells["A2"].Formula = "A2";
            cells["B1"].Formula = "B1";
            cells["B2"].Formula = "B2";
             
            // Insert two rows before row 2.
            cells["2:3"].Insert();
             
            // Insert three columns before column 'B'.
            cells["B:D"].Insert();
             
            // Verify new locations - A1 has not moved.
            Debug.Assert(cells["A1"].Formula.Equals("A1"));
            // A2 has been moved down two rows.
            Debug.Assert(cells["A4"].Formula.Equals("A2"));
            // B1 has been moved right three columns.
            Debug.Assert(cells["E1"].Formula.Equals("B1"));
            // B2 has been moved down two rows and right three columns.
            Debug.Assert(cells["E4"].Formula.Equals("B2"));
             
            // Insert one cell before E4 shifting E4 down to E5.
            cells["E4"].Insert(InsertShiftDirection.Down);
            Debug.Assert(cells["E5"].Formula.Equals("B2"));
             
            // Insert one cell before E5 shifting E5 right to F5.
            cells["E5"].Insert(InsertShiftDirection.Right);
            Debug.Assert(cells["F5"].Formula.Equals("B2"));
        }
    }
}
Imports System
Imports SpreadsheetGear
Imports System.Diagnostics
             
             
Namespace SpreadsheetGear.InsertExample
            
    Class Program
             
        Shared Sub Main()
            ' Create a workbook.
            Dim workbook As IWorkbook = Factory.GetWorkbook()
            Dim worksheet As IWorksheet = workbook.Worksheets(0)
            Dim cells As IRange = worksheet.Cells
             
            ' Set some text in A1:B2.
            cells("A1").Formula = "A1"
            cells("A2").Formula = "A2"
            cells("B1").Formula = "B1"
            cells("B2").Formula = "B2"
             
            ' Insert two rows before row 2.
            cells("2:3").Insert()
             
            ' Insert three columns before column 'B'.
            cells("B:D").Insert()
             
            ' Verify new locations - A1 has not moved.
            Debug.Assert(cells("A1").Formula.Equals("A1"))
            ' A2 has been moved down two rows.
            Debug.Assert(cells("A4").Formula.Equals("A2"))
            ' B1 has been moved right three columns.
            Debug.Assert(cells("E1").Formula.Equals("B1"))
            ' B2 has been moved down two rows and right three columns.
            Debug.Assert(cells("E4").Formula.Equals("B2"))
             
            ' Insert one cell before E4 shifting E4 down to E5.
            cells("E4").Insert(InsertShiftDirection.Down)
            Debug.Assert(cells("E5").Formula.Equals("B2"))
             
            ' Insert one cell before E5 shifting E5 right to F5.
            cells("E5").Insert(InsertShiftDirection.Right)
            Debug.Assert(cells("F5").Formula.Equals("B2"))
        End Sub 'Main
    End Class 'Program
End Namespace 'SpreadsheetGear.InsertExample
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

IRange Interface
IRange Members
Overload List
Delete Method
Delete(DeleteShiftDirection) Method
Insert Method
InsertShiftDirection Enumeration

Send Feedback