CsvData

種別 ファイル入出力
説明 CSVファイルから、指定した項目のデータを取得します。

構文 CsvData([File][, Item][, LineNo])
引数 File :CSVのファイルパス
Item :CSVの項目名
LineNo:CSVの行番号
戻り値 Fileのみを指定した場合、CSVの行数を返す。
ItemとLineNoを指定した場合、項目データを返す。
使用例 dim i,cnt,s

cnt = CsvData("C:\temp\DW\TEST.CSV") 'CSVの行数を返す
s = ""
For i=1 To cnt
   '同じファイルなら、ファイルパスは、指定しなくても良い
  s = s & "受注番号 = " & CsvData("受注番号", i) & ", "
  s = s & "品名1 = " & CsvData("品名1", i) & ", "
  s = s & "品名2 = " & CsvData("品名2", i) & vbCrLf
Next i
MsgBox(s)

'行数を取得せずに、データ取得も可能
s = CsvData("C:\temp\DW\マスター.csv", "業者名", 2)

'ファイル名を指定しない場合、直前のCsvDataのファイルから取得
s = CsvData("C:\temp\DW\注文書.csv", "型式", 3)
s = CsvData(, "型式", 3)  'どちらの方式でも取得可能
s = CsvData("型式", 3)  'どちらの方式でも取得可能
実例  
備考 関連する関数(DataFileLoad、DataFileSave、DefinitionLoad、
DefinitionSave、TextFileLoad、TextFileSave、CsvData、
SaveFieldCsv、SaveFile、SavePdf、AutoNumbering)