Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

20018 / 76737

←次へ　｜　前へ→


	【62144】Re:CSVファイルの読み込みについて

neptune - 09/6/24(水) 16:54 -


	引用なし

	パスワード

▼困り猫さん：
こんにちは

>※念のため、ソースも掲載させて頂きます↓
これがあったからResつける気になりました。

1,3,8,0,1|5,9
で、textファイルを作成して、最小条件で検証しました。
再現します。

で、少しだけ調べたんですが、原因は正直わかりません。
Inputステートメントで、"|"は何か特別な意味を持つのかもしれませんね。

そこでなんですが、
line input で1行全部読み込んで、split関数でカンマで分割すると
正常に読み込めることは確認しました。

原因はわかりませんが、これで回避しては如何ですか？

本当に最小限のテストソースですが、一応まともに取得できるようです。
Sub t()
Dim fNum As Long
Dim sLine() As String, sBuf As String
Const csPath As String = "E:\hoge\test.txt"

　　fNum = FreeFile()
　　
　　Open csPath For Input As #fNum
　　Line Input #fNum, sBuf
　　sLine = Split(sBuf, ",")
　　Close #fNum
End Sub

0 hits

▼

【62143】CSVファイルの読み込みについて 困り猫 09/6/24(水) 16:23