PowerTools SPREAD for Windows Forms 8.0J
SwitchRowColumn メソッド (SpreadChart)


チャートの行と列を入れ替えます。
構文
'Declaration
 
Public Overridable Function SwitchRowColumn() As Boolean
'使用法
 
Dim instance As SpreadChart
Dim value As Boolean
 
value = instance.SwitchRowColumn()
public virtual bool SwitchRowColumn()

戻り値の型

入れ替え処理が成功した場合はTrue、それ以外の場合はFalseを返します。
次のサンプルコードは、SwitchRowColumnメソッドを使用します。
fpSpread1.Sheets[0].Cells[0, 1].Value = "c1";
fpSpread1.Sheets[0].Cells[0, 2].Value = "c2";
fpSpread1.Sheets[0].Cells[0, 3].Value = "c3";
fpSpread1.Sheets[0].Cells[1, 0].Value = "s1";
fpSpread1.Sheets[0].Cells[2, 0].Value = "s2";
fpSpread1.Sheets[0].Cells[3, 0].Value = "s3";
fpSpread1.Sheets[0].Cells[4, 0].Value = "s4";
fpSpread1.Sheets[0].Cells[5, 0].Value = "s5";
fpSpread1.Sheets[0].Cells[6, 0].Value = "s6";

fpSpread1.Sheets[0].Cells[1, 1].Value = 1;
fpSpread1.Sheets[0].Cells[2, 1].Value = 2;
fpSpread1.Sheets[0].Cells[3, 1].Value = 3;
fpSpread1.Sheets[0].Cells[4, 1].Value = 4;
fpSpread1.Sheets[0].Cells[5, 1].Value = 5;
fpSpread1.Sheets[0].Cells[6, 1].Value = 6;

fpSpread1.Sheets[0].Cells[1, 2].Value = 7;
fpSpread1.Sheets[0].Cells[2, 2].Value = 8;
fpSpread1.Sheets[0].Cells[3, 2].Value = 9;
fpSpread1.Sheets[0].Cells[4, 2].Value = 10;
fpSpread1.Sheets[0].Cells[5, 2].Value = 11;
fpSpread1.Sheets[0].Cells[6, 2].Value = 12;

fpSpread1.Sheets[0].Cells[1, 3].Value = 13;
fpSpread1.Sheets[0].Cells[2, 3].Value = 14;
fpSpread1.Sheets[0].Cells[3, 3].Value = 15;
fpSpread1.Sheets[0].Cells[4, 3].Value = 16;
fpSpread1.Sheets[0].Cells[5, 3].Value = 17;
fpSpread1.Sheets[0].Cells[6, 3].Value = 18;
         
fpSpread1.Sheets[0].AddChart(0,0,typeof(FarPoint.Win.Chart.BarSeries),400,400,0,0,FarPoint.Win.Chart.ChartViewType.View2D, true);
FarPoint.Win.Spread.Chart.SpreadChart chart = fpSpread1.Sheets[0].Charts[0];
chart.Formula = " Sheet1!$A$1:$D$7";
chart.ContextMenuStrip = new FarPoint.Win.Spread.Chart.SpreadChartContextMenuStrip(chart);
if (chart.CanSwitchRowColumn)
chart.SwitchRowColumn();
FpSpread1.Sheets(0).Cells(0, 1).Value = "c1"
FpSpread1.Sheets(0).Cells(0, 2).Value = "c2"
FpSpread1.Sheets(0).Cells(0, 3).Value = "c3"
FpSpread1.Sheets(0).Cells(1, 0).Value = "s1"
FpSpread1.Sheets(0).Cells(2, 0).Value = "s2"
FpSpread1.Sheets(0).Cells(3, 0).Value = "s3"
FpSpread1.Sheets(0).Cells(4, 0).Value = "s4"
FpSpread1.Sheets(0).Cells(5, 0).Value = "s5"
FpSpread1.Sheets(0).Cells(6, 0).Value = "s6"

FpSpread1.Sheets(0).Cells(1, 1).Value = 1
FpSpread1.Sheets(0).Cells(2, 1).Value = 2
FpSpread1.Sheets(0).Cells(3, 1).Value = 3
FpSpread1.Sheets(0).Cells(4, 1).Value = 4
FpSpread1.Sheets(0).Cells(5, 1).Value = 5
FpSpread1.Sheets(0).Cells(6, 1).Value = 6

FpSpread1.Sheets(0).Cells(1, 2).Value = 7
FpSpread1.Sheets(0).Cells(2, 2).Value = 8
FpSpread1.Sheets(0).Cells(3, 2).Value = 9
FpSpread1.Sheets(0).Cells(4, 2).Value = 10
FpSpread1.Sheets(0).Cells(5, 2).Value = 11
FpSpread1.Sheets(0).Cells(6, 2).Value = 12

FpSpread1.Sheets(0).Cells(1, 3).Value = 13
FpSpread1.Sheets(0).Cells(2, 3).Value = 14
FpSpread1.Sheets(0).Cells(3, 3).Value = 15
FpSpread1.Sheets(0).Cells(4, 3).Value = 16
FpSpread1.Sheets(0).Cells(5, 3).Value = 17
FpSpread1.Sheets(0).Cells(6, 3).Value = 18

FpSpread1.Sheets(0).AddChart(0, 0, GetType(FarPoint.Win.Chart.BarSeries), 400, 400, 0, 0, FarPoint.Win.Chart.ChartViewType.View2D, True)
Dim chart As FarPoint.Win.Spread.Chart.SpreadChart
chart = FpSpread1.Sheets(0).Charts(0)
chart.Formula = " Sheet1!$A$1:$D$7"
chart.ContextMenuStrip = New FarPoint.Win.Spread.Chart.SpreadChartContextMenuStrip(chart)
If (chart.CanSwitchRowColumn) Then
chart.SwitchRowColumn()
End If
参照

SpreadChart クラス
SpreadChart メンバ

 

 


© 2004-2015, GrapeCity inc. All rights reserved.