VBAでCSV取込 への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 shu  (社会人) 投稿日時 2012/2/16 12:15:01
改行部分にCR(アスキーコード13)が含まれていないとか?
たしかCR+LFとCRしか改行として認識しなかったと思う。
投稿者 熊造  (社会人) 投稿日時 2012/2/16 11:40:55
改行がされていないようです。
22列あるのですが
myLine(2)     一行目
myLine(24)  二行目
となります。



投稿者 熊造  (社会人) 投稿日時 2012/2/16 10:58:09
shuさん ありがとうございます。

myLine(2)ですね 失礼しました。

Debug.Print の結果が1行目しかでてこないんです。
2行目以降のものも取得したいのですが 方法がわかりません
説明不足でした。 申し訳ありません
投稿者 shu  (社会人) 投稿日時 2012/2/16 10:40:37
myLine(3) => myLine(2)
でどうでしょう?

投稿者 熊造  (社会人) 投稿日時 2012/2/16 10:14:03
10行あるCSVの3番目の項目全部を取得したいのですがうまくいきません
ご存知の方教えていただけないでしょうか
 
   Dim FN As Integer
    Dim strLine As String
    Dim myLine() As String

    FN = FreeFile
    Open c:\test.csv For Input As #FN

    Do While Not EOF(FN)

         Line Input #FN, strLine
        myLine = Split(strLine, ",")
        Debug.Print myLine(3)
    Loop

    Close #intFileNo