Excel VBA質問箱 IV

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

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


20013 / 76732 ←次へ | 前へ→

【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 質問
【62144】Re:CSVファイルの読み込みについて neptune 09/6/24(水) 16:54 発言
【62152】Re:CSVファイルの読み込みについて 困り猫 09/6/25(木) 11:07 質問
【62153】Re:CSVファイルの読み込みについて neptune 09/6/25(木) 11:20 回答
【62145】Re:CSVファイルの読み込みについて イブX 09/6/24(水) 17:35 発言
【62155】Re:CSVファイルの読み込みについて 困り猫 09/6/25(木) 12:54 お礼
【62157】Re:CSVファイルの読み込みについて kanabun 09/6/25(木) 14:06 発言
【62163】Re:CSVファイルの読み込みについて 困り猫 09/6/25(木) 16:28 お礼
【62174】Re:CSVファイルの読み込みについて kanabun 09/6/26(金) 11:53 発言
【62158】Re:CSVファイルの読み込みについて イブX 09/6/25(木) 14:45 発言
【62164】Re:CSVファイルの読み込みについて 困り猫 09/6/25(木) 16:34 お礼
【62146】Re:CSVファイルの読み込みについて kanabun 09/6/24(水) 20:31 発言
【62147】Re:CSVファイルの読み込みについて neptune 09/6/24(水) 20:48 発言
【62154】Re:CSVファイルの読み込みについて 困り猫 09/6/25(木) 11:45 お礼
【62148】Re:CSVファイルの読み込みについて 困り猫 09/6/24(水) 21:02 お礼

20013 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free