| |
はじめまして。
データの一括編集について質問です。
Oracleよりレコードセットを取得し、
シートに対して編集を行っているのですが、
以下のような編集をしています。
Do Until RST.EOF
With Worksheets(1)
.Range("A" & lRow).Value = RST.Fields("年度").Value
.Range("B" & lRow).Value = RST.Fields("Ａコード").Value
.Range("C" & lRow).Value = RST.Fields("Ａ名称").Value
.
.
.
.
End With
RST.MoveNext
lRow = lRow + 1
Loop
これだと、結構な時間がかかっています。
※1,000件以上のデータを処理しています。
そこで、項目をTab、レコードをCrlfで区切る等して変数に格納し、
数百件単位でシートに編集する方法（範囲を選択する等して）はありますでしょうか？
過去ログを検索したのですが、ヒットしませんでした＾＾；
初質問ですので、言葉足らずがあるかと思いますが、
ご回答の程よろしくお願い致します。
Windows 2000
Excel 2000
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
