PowerTools SPREAD for Windows Forms 10.0J
SaveTextFileRange(Int32,Int32,Int32,Int32,Stream,TextFileFlags,IncludeHeaders,String,String,String) メソッド


行の開始インデックス
列の開始インデックス
行数
列数
テキスト化シートの保存先のストリーム
テキストファイルに保存するときのデータの処理方法を指定します。
ヘッダがデータとしてエクスポートされているかどうか
行区切り文字列
列区切り文字列
セル区切り文字列
名前、書式文字列、および区切り文字を指定して、 セル範囲をテキストファイルに保存します。
構文
'Declaration
 
Public Overloads Function SaveTextFileRange( _
   ByVal row As Integer, _
   ByVal column As Integer, _
   ByVal rowCount As Integer, _
   ByVal columnCount As Integer, _
   ByVal stream As Stream, _
   ByVal textFileFlags As TextFileFlags, _
   ByVal includeHeaders As IncludeHeaders, _
   ByVal rowDelimiter As String, _
   ByVal columnDelimiter As String, _
   ByVal cellDelimiter As String _
) As Boolean
'使用法
 
Dim instance As SheetView
Dim row As Integer
Dim column As Integer
Dim rowCount As Integer
Dim columnCount As Integer
Dim stream As Stream
Dim textFileFlags As TextFileFlags
Dim includeHeaders As IncludeHeaders
Dim rowDelimiter As String
Dim columnDelimiter As String
Dim cellDelimiter As String
Dim value As Boolean
 
value = instance.SaveTextFileRange(row, column, rowCount, columnCount, stream, textFileFlags, includeHeaders, rowDelimiter, columnDelimiter, cellDelimiter)

パラメータ

row
行の開始インデックス
column
列の開始インデックス
rowCount
行数
columnCount
列数
stream
テキスト化シートの保存先のストリーム
textFileFlags
テキストファイルに保存するときのデータの処理方法を指定します。
includeHeaders
ヘッダがデータとしてエクスポートされているかどうか
rowDelimiter
行区切り文字列
columnDelimiter
列区切り文字列
cellDelimiter
セル区切り文字列
次のサンプルコードは、テキストファイルに保存します。
SaveFileDialog sfd = new SaveFileDialog();
System.IO.Stream s;
sfd.Filter = "text files (*.txt)|*.txt";
sfd.FilterIndex = 2;
sfd.RestoreDirectory = true;
if (sfd.ShowDialog() == DialogResult.OK)
{
   s = sfd.OpenFile();
   fpSpread1.ActiveSheet.SaveTextFileRange(0,0, 5, 5, s, FarPoint.Win.Spread.TextFileFlags.Unformatted, FarPoint.Win.Spread.Model.IncludeHeaders.BothCustomOnly, "\r",",", "");
   s.Close();
}
Dim sd As New SaveFileDialog()
Dim s As System.IO.Stream
sd.Filter = "text files (*.txt)|*.txt"
sd.FilterIndex = 2
sd.RestoreDirectory = True
If sd.ShowDialog() = DialogResult.OK Then
 s = sd.OpenFile
 FpSpread1.ActiveSheet.SaveTextFileRange(0, 0, 5, 5, s, FarPoint.Win.Spread.TextFileFlags.Unformatted, FarPoint.Win.Spread.Model.IncludeHeaders.BothCustomOnly, Chr(13), ",", "")
 s.Close()
End If
参照

SheetView クラス
SheetView メンバ
オーバーロード一覧

 

 


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