DOBON.NET DOBON.NETプログラミング掲示板過去ログ

VB6.0でExcel操作

  • 題名: VB6.0でExcel操作
  • 著者: はらはら
  • 日時: 2004/10/29 19:53:32
  • ID: 7061
  • この記事の返信元:
    • （なし）
  • この記事への返信:
  • ツリーを表示
環境/言語:[VB6.0　WindowsXP　Office2000]
分類:[VB6以前]

とある大量のデータをVB6.0にてExcelに(xls)出力しようと思います。
ですが
Dim exl as object
Set exl = CreateObject("Excel.Sheet")

do until strData.eof
exl.worksheets(1).Cells(j, i).Value = rec
loop

などでセルに一つずつ出力していくと
大変時間がかかってしまって効率が悪いので

strData="aaa" & vbTab & "bbb" & vbTab & "ccc"
exl.worksheets(1).Cells(j, i).Value = strData

などで一行単位で吐き出したいのですが
うまくいきません

strDataが一つの行ではなく一つのセルに出力されてしまいます。

多分「vbTab」をExcel側が認知できていないのが問題かと思われます。

解決策はないでしょうか

もしくは効率の良い（処理速度の早い）別の方法はないでしょうか
  • 題名: Re[1]: VB6.0でExcel操作
  • 著者: 深山
  • 日時: 2004/10/30 15:36:04
  • ID: 7067
  • この記事の返信元:
  • この記事への返信:
    • （なし）
  • ツリーを表示
他掲示板のやり取りですが、こちらなど参考になるかも知れません。

VBからExcelのセルに値を代入するときの処理速度
http://www.bcap.co.jp/hanafusa/vbbbs/wforum.cgi?mode=allread&no=5590&pastlog=0001&act=past
DOBON.NET | プログラミング道 | プログラミング掲示板