質問編集履歴

1 文章の修正

nissanngtr34

nissanngtr34 score 24

2015/09/17 14:17  投稿

VBAでCSVから読み込んだものをすべてセルに入れる
csvを読み込んだものを配列にし、セルの範囲を指定しないで入れたいのですがどうしたらよろしいでしょうか?
「Range("A10:D10") = tmp」このようにセルの範囲を指定をせずにすべてを貼り付けたいです。
「Range("A10:D10") = tmp」このようにセルの範囲を指定をせずにCSVに入ってる情報すべてを貼り付けたいです。
foreachを使えばよろしいでしょうか?
csvの中身は
yamada,山田,yamada@yahoo.co.jp
suzuki,鈴木,suzuki@yahoo.co.jp
```   
Sub csv読み込み()
Dim buf As String, tmp As Variant, n As Long
Open "user.csv" For Input As #1
Do Until EOF(1)
Line Input #1, buf
tmp = Split(buf, ",")
Loop
Close #1
Range("A10:D10") = tmp
End Sub
```
  • VBA

    5025 questions

    VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

  • CSV

    2232 questions

    CSV(Comma-Separated Values)はコンマで区切られた明白なテキスト値のリストです。もしくは、そのフォーマットでひとつ以上のリストを含むファイルを指します。

  • Excel

    4058 questions

    Excelは、マイクロソフト社が開発しているデータ集計や分析を行う表計算ソフトの一つです。文書作成や表計算、資料作成などの多彩な機能を備えており、統合パッケージであるMicrosoft Officeに含まれています。

思考するエンジニアのためのQ&Aサイト「teratail」について詳しく知る