• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:CSVのファイルをExcelに読み込むには?)

CSVファイルをExcelに読み込む方法

このQ&Aのポイント
  • VBAを使用して、CSVファイルをExcelのワークシートに読み込む方法を教えてください。
  • ワークシートにCSVファイルのデータを分割して振り分ける方法も教えてください。
  • 最後の番号8桁にスペースが入っているかどうかによって処理方法が異なるようです。

質問者が選んだベストアンサー

  • ベストアンサー
  • o_chi_chi
  • ベストアンサー率45% (131/287)
回答No.1

項目分割以外はできていると仮定します。 商品名は全角5文字 取得データを変数getlineに格納 --- 1.最後以外は固定長なのでMidで分割する a = mid(getline, 1, 22) b = mid(getline, 24, 15) c = mid(getline, 40) 2.splitで分割し最後の項目を連結する ary = split(getline, " ") a = ary(0) b = ary(1) if ubound(ary) = 2 then c = ary(2) else c = ary(2) + ary(3) endif

tickletickle
質問者

お礼

ありがとうございます。 分割してからくっつけるのですか! 何とか頑張ってやってみます!

関連するQ&A