'Declaration Public Sub MoveTableColumns( _ ByVal fromColumn As Integer, _ ByVal toColumn As Integer, _ ByVal count As Integer _ )
Parameters
- fromColumn
- The column to move from.
- toColumn
- The column to move to.
- count
- The number of columns to move.
'Declaration Public Sub MoveTableColumns( _ ByVal fromColumn As Integer, _ ByVal toColumn As Integer, _ ByVal count As Integer _ )
FarPoint.Win.Spread.TableStyle tstyle = fpSpread1.CreateTableStyle("Style1", FarPoint.Win.Spread.TableStyle.TableStyleLight2); fpSpread1.Sheets[0].Cells[1, 1].Text = "Last Name"; fpSpread1.Sheets[0].Cells[1, 2].Text = "Value"; fpSpread1.Sheets[0].Cells[2, 1].Text = "Smith"; fpSpread1.Sheets[0].Cells[2, 2].Value = 50; fpSpread1.Sheets[0].Cells[3, 1].Text = "Vil"; fpSpread1.Sheets[0].Cells[3, 2].Value = 10; fpSpread1.Sheets[0].Cells[4, 1].Text = "Press"; fpSpread1.Sheets[0].Cells[4, 2].Value = 78; fpSpread1.TableStyleCollection.Add(tstyle); FarPoint.Win.Spread.TableView table = fpSpread1.Sheets[0].AddTable("table", 1, 1, 5, 2, "Style1"); table.AddColumns(1, 1); table.MoveTableColumns(1, 2, 1);
Dim tstyle As FarPoint.Win.Spread.TableStyle tstyle = FpSpread1.CreateTableStyle("Style1", FarPoint.Win.Spread.TableStyle.TableStyleLight2) FpSpread1.Sheets(0).Cells(1, 1).Text = "Last Name" FpSpread1.Sheets(0).Cells(1, 2).Text = "Value" FpSpread1.Sheets(0).Cells(2, 1).Text = "Smith" FpSpread1.Sheets(0).Cells(2, 2).Value = 50 FpSpread1.Sheets(0).Cells(3, 1).Text = "Vil" FpSpread1.Sheets(0).Cells(3, 2).Value = 10 FpSpread1.Sheets(0).Cells(4, 1).Text = "Press" FpSpread1.Sheets(0).Cells(4, 2).Value = 78 FpSpread1.TableStyleCollection.Add(tstyle) Dim table As FarPoint.Win.Spread.TableView = FpSpread1.Sheets(0).AddTable("table", 1, 1, 5, 2, "Style1") table.AddColumns(1, 1) table.MoveTableColumns(1, 2, 1)