Excel VBA質問箱 IV

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

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


20004 / 76732 ←次へ | 前へ→

【62153】Re:CSVファイルの読み込みについて
回答  neptune  - 09/6/25(木) 11:20 -

引用なし
パスワード
   ▼困り猫 さん:

>やはり"|"以降のデータが削除される
は既に他の方からアドバイスがありますよね。
>  Dim X(1 To 43) As Variant    ' 読み込んだレコード内容
Dim X(1 To 43) As String    ※先ずはこれ。
途中省略
>  fNum = FreeFile()
>  ' 指定ファイルをOPEN(入力モード)
>  Open strFILENAME For Input As #fNum
>  Line Input #fNum, sBuf
>  sLine = Split(sBuf, ",")
sLineがどこにも出力されていない。だから
>・CSVファイルの1行目のデータが読み飛ばされる

do loopの中では最初のVariant型が変更されていないので
>Input #fNum, X(RETSU)
としているが、これでは何も変わっていない。全ての行を1行ずつ読み込むなら
それで最後までやった方がわかり易い。

ぱっと見た感じでも以上が指摘できます。

中途半端に改造するより
open ステートメントからCloseステートメントまでの間を考えながら
見直して見てください。

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 お礼

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