ヘッダも含めてテキストファイルにエクスポートしたい

文書番号 : 37560 文書種別 : 技術情報登録日 : 2014/08/29 最終更新日 : 2014/08/29

対象製品

SPREAD for Windows Forms 7.0J

詳細

SaveTextFile メソッドのオーバーロードにより、テキストファイルエクスポート時にヘッダを含めることができます。

メモ

下記サンプルコードのようにヘッダに値を明示的に設定しなければ空白セルとしてエクスポートされます。

◎サンプルコード(VB)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　Dim i As Integer
　　Dim j As Integer

　　FpSpread1.ActiveSheet.RowCount = 10
　　FpSpread1.ActiveSheet.ColumnCount = 5

　　' テストデータを設定
　　For i = 0 To FpSpread1.ActiveSheet.RowCount - 1
　　　　For j = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
　　　　　　FpSpread1.ActiveSheet.Cells(i, j).Value = "R=" + i.ToString() + "C=" + j.ToString()
　　　　Next
　　Next

　　' ヘッダの値を明示的に指定
　　For i = 0 To FpSpread1.ActiveSheet.RowCount - 1
　　　　FpSpread1.ActiveSheet.RowHeader.Cells(i, 0).Value = i + 1
　　Next
　　For j = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
　　　　FpSpread1.ActiveSheet.ColumnHeader.Cells(0, j).Value = Chr(65 + j)
　　Next
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　' csv ファイルにエクスポート
　　FpSpread1.ActiveSheet.SaveTextFile("test.csv", FarPoint.Win.Spread.TextFileFlags.None, FarPoint.Win.Spread.Model.IncludeHeaders.BothCustomOnly, Chr(13), ",", "")
End Sub

◎サンプルコード(C#)

private void Form1_Load(object sender, EventArgs e)
{
　　int i;
　　int j;

　　fpSpread1.ActiveSheet.RowCount = 10;
　　fpSpread1.ActiveSheet.ColumnCount = 5;

　　// テストデータを設定
　　for (i = 0; i < fpSpread1.ActiveSheet.RowCount; i++)
　　{
　　　　for (j = 0; j < fpSpread1.ActiveSheet.ColumnCount; j++)
　　　　{
　　　　　　fpSpread1.ActiveSheet.Cells[i, j].Value = "R=" + i.ToString() + "C=" + j.ToString();
　　　　}
　　}

　　// ヘッダの値を明示的に指定
　　for (i = 0; i < fpSpread1.ActiveSheet.RowCount; i++)
　　{
　　　　fpSpread1.ActiveSheet.RowHeader.Cells[i, 0].Value = i + 1;
　　}
　　for (j = 0; j < fpSpread1.ActiveSheet.ColumnCount; j++)
　　{
　　　　fpSpread1.ActiveSheet.ColumnHeader.Cells[0, j].Value = (char)(65 + j);
　　}
}

private void button1_Click(object sender, EventArgs e)
{
　　// csv ファイルにエクスポート
　　fpSpread1.ActiveSheet.SaveTextFile("test.csv", FarPoint.Win.Spread.TextFileFlags.None, FarPoint.Win.Spread.Model.IncludeHeaders.BothCustomOnly, System.Environment.NewLine, ",", "");
}