Excel VBA質問箱 IV

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

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


29 / 74597 ←次へ | 前へ→

【80212】タブ区切りのテキストファイル読み込み
質問  ken  - 18/10/25(木) 15:30 -

引用なし
パスワード
   初歩的な質問ですが、行き詰まってしまったので
ご教授をお願いいたします。

ADODB.Streamオブジェクトを使用し
タブ区切りのUTF-8コードのテキストファイルを読み込んで
データ処理を行いたいのですが、1行ずつ読み込んだデータが
なぜかタブが削除されてしまう動作をしてしまい。
データ処理ができません。

他に確認すべき事項があれば教えて下さい。

Dim adoSt As Object
Set adoSt = CreateObject("ADODB.Stream")

With adoSt
  .Charset = "UTF-8"  
  .Type = adTypeText 
  .Open         
  .LoadFromFile (strPath)

  Do Until .EOS    

    strLine = .ReadText(adReadLine) ←この時点でタブが無くなります。

    aryLine = Split(strLine,vbTab)    

    '書き込み処理

  Loop

  .Close
End With

47 hits

【80212】タブ区切りのテキストファイル読み込み ken 18/10/25(木) 15:30 質問[未読]
【80215】Re:タブ区切りのテキストファイル読み込み γ 18/10/25(木) 20:34 発言[未読]
【80218】Re:タブ区切りのテキストファイル読み込み ken 18/10/25(木) 21:31 回答[未読]
【80219】Re:タブ区切りのテキストファイル読み込み γ 18/10/25(木) 21:33 発言[未読]
【80220】Re:タブ区切りのテキストファイル読み込み ken 18/10/26(金) 8:34 お礼[未読]

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