投稿日 | : 2005/06/29(Wed) 18:17 |
投稿者 | : ももたろう |
Eメール | : |
URL | : |
タイトル | : Re^2: EXCELに高速で貼り付ける方法 |
るしぇ様
返信ありがとうございます。
いままで数分かかっていた処理が1秒で出来るようになりました。
ありがとうございます。
> 配列って言ってもユーザ定義型なら無理。
> Variant 型の2次元配列に入れなおして1ステップで可能です。
> 1秒かからないでしょう。
> [VB6.0]
> Dim Datax() As Variant
> 'Datax の中身を適当な2次元配列に設定
> Set xlSheet = xlBook.Sheets(Sheets.Count)
> xlSheet.Range("$B$1").Resize(UBound(Datax, 1), UBound(Datax, 2)).Value = Datax