Visual Basic (Usage) | Copy Code |
---|---|
Dim instance As SheetView Dim location As CellRange instance.UngroupSparkline(location) |
Parameters
- location
- Location
This example groups and ungroups sparklines.
C# | Copy Code |
---|---|
FarPoint.Win.Spread.SheetView sv = new FarPoint.Win.Spread.SheetView(); private void Form1_Load(object sender, EventArgs e) { FarPoint.Win.Spread.Chart.SheetCellRange test = new FarPoint.Win.Spread.Chart.SheetCellRange(sv, 0, 0, 2, 4); FarPoint.Win.Spread.Model.CellRange data2 = new FarPoint.Win.Spread.Model.CellRange(0, 5, 2, 1); FarPoint.Win.Spread.ExcelSparklineSetting ex = new FarPoint.Win.Spread.ExcelSparklineSetting(); ex.ShowFirst = true; ex.FirstMarkerColor = Color.Violet; fpSpread1.Sheets[0] = sv; sv.Cells[0, 0].Value = 2; sv.Cells[0, 1].Value = 5; sv.Cells[0, 2].Value = 4; sv.Cells[0, 3].Value = -1; sv.Cells[0, 4].Value = 3; sv.Cells[1, 0].Value = 3; sv.Cells[1, 1].Value = 1; sv.Cells[1, 2].Value = 2; sv.Cells[1, 3].Value = -1; sv.Cells[1, 4].Value = 5; sv.Cells[2, 0].Value = 3; sv.Cells[2, 1].Value = 1; sv.Cells[2, 2].Value = 2; sv.Cells[2, 3].Value = -1; sv.Cells[2, 4].Value = 5; fpSpread1.Sheets[0].AddSparkline(test, data2, FarPoint.Win.Spread.SparklineType.Column, ex); FarPoint.Win.Spread.Chart.SheetCellRange test1 = new FarPoint.Win.Spread.Chart.SheetCellRange(sv, 2, 0, 1, 4); FarPoint.Win.Spread.Model.CellRange data3 = new FarPoint.Win.Spread.Model.CellRange(2, 5, 1, 1); FarPoint.Win.Spread.ExcelSparklineSetting ex1 = new FarPoint.Win.Spread.ExcelSparklineSetting(); ex1.FirstMarkerColor = Color.Red; ex1.ShowFirst = true; fpSpread1.Sheets[0].AddSparkline(test1, data3, FarPoint.Win.Spread.SparklineType.Column, ex1); sv.Cells[4, 0].Value = 2; sv.Cells[4, 1].Value = 1; sv.Cells[5, 0].Value = 5; sv.Cells[5, 1].Value = 3; FarPoint.Win.Spread.Chart.SheetCellRange newdata = new FarPoint.Win.Spread.Chart.SheetCellRange(sv, 4, 0, 2, 2); FarPoint.Win.Spread.Model.CellRange newlocation = new FarPoint.Win.Spread.Model.CellRange(6, 0, 1, 2); FarPoint.Win.Spread.ExcelSparklineSetting ex2 = new FarPoint.Win.Spread.ExcelSparklineSetting(); fpSpread1.Sheets[0].AddSquareSparkline(newdata, newlocation, FarPoint.Win.Spread.SparklineType.Column, ex2, true); } private void button1_Click(object sender, EventArgs e) { fpSpread1.Sheets[0].GroupSparkline(new FarPoint.Win.Spread.Model.CellRange[] { new FarPoint.Win.Spread.Model.CellRange(0, 5, 3, 1) }, FarPoint.Win.Spread.SparklineType.Column); fpSpread1.Sheets[0].UngroupSparkline("F1:F3"); //fpSpread1.Sheets[0].UngroupSparkline(new FarPoint.Win.Spread.Model.CellRange(0, 5, 3, 1)); } |
Visual Basic | Copy Code |
---|---|
Dim sv As New FarPoint.Win.Spread.SheetView() Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim data2 As New FarPoint.Win.Spread.Chart.SheetCellRange(sv, 0, 0, 2, 4) Dim test As New FarPoint.Win.Spread.Model.CellRange(0, 5, 2, 1) Dim ex As New FarPoint.Win.Spread.ExcelSparklineSetting() ex.ShowFirst = True ex.FirstMarkerColor = Color.Violet FpSpread1.Sheets(0) = sv sv.Cells(0, 0).Value = 2 sv.Cells(0, 1).Value = 5 sv.Cells(0, 2).Value = 4 sv.Cells(0, 3).Value = -1 sv.Cells(0, 4).Value = 3 sv.Cells(1, 0).Value = 3 sv.Cells(1, 1).Value = 1 sv.Cells(1, 2).Value = 2 sv.Cells(1, 3).Value = -1 sv.Cells(1, 4).Value = 5 sv.Cells(2, 0).Value = 3 sv.Cells(2, 1).Value = 1 sv.Cells(2, 2).Value = 2 sv.Cells(2, 3).Value = -1 sv.Cells(2, 4).Value = 5 FpSpread1.Sheets(0).AddSparkline(data2, test, FarPoint.Win.Spread.SparklineType.Column, ex) Dim data3 = New FarPoint.Win.Spread.Chart.SheetCellRange(sv, 2, 0, 1, 4) Dim test1 = New FarPoint.Win.Spread.Model.CellRange(2, 5, 1, 1) Dim ex1 As New FarPoint.Win.Spread.ExcelSparklineSetting() ex1.FirstMarkerColor = Color.Red ex1.ShowFirst = True FpSpread1.Sheets(0).AddSparkline(data3, test1, FarPoint.Win.Spread.SparklineType.Column, ex1) sv.Cells(4, 0).Value = 2 sv.Cells(4, 1).Value = 1 sv.Cells(5, 0).Value = 5 sv.Cells(5, 1).Value = 3 Dim newdata = New FarPoint.Win.Spread.Chart.SheetCellRange(sv, 4, 0, 2, 2) Dim newlocation = New FarPoint.Win.Spread.Model.CellRange(6, 0, 1, 2) Dim ex2 As New FarPoint.Win.Spread.ExcelSparklineSetting() FpSpread1.Sheets(0).AddSquareSparkline(newdata, newlocation, FarPoint.Win.Spread.SparklineType.Column, ex2, True) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click FpSpread1.Sheets(0).GroupSparkline(New FarPoint.Win.Spread.Model.CellRange() {New FarPoint.Win.Spread.Model.CellRange(0, 5, 3, 1)}, FarPoint.Win.Spread.SparklineType.Column) FpSpread1.Sheets(0).UngroupSparkline("F1:F3") 'or FpSpread1.Sheets(0).UngroupSparkline(New FarPoint.Win.Spread.Model.CellRange(0, 5, 3, 1)) End Sub |
Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8