csvファイルのインポートについて (ID:85276)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ご回答ありがとうございます。 早速宣言を下記にして実行したのですが、 結果は前回と同じく2004の数字のみセットされます。 ご教授よろしくお願いします。 Dim a1 As String Dim a2 As String Dim a3 As String Dim a4 As String Dim a5 As String Dim Readline As String Open strCSVF For Input As #intFNo Line Input #intFNo, Readline の場合 debug.print Readline 内容 1234,2004/08/24(火),264,22,"1,343,700" この結果は良いのですが、 Input #intFNo, a1, a2, a3,a4,a5 debug.print a2 2004 で/までの数字のみの取得になります。