掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Excelファイルのデータを効率よく読み込んで、修正して保存するには? (ID:115698)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Cells で1つ1つ読み取るのは時間がかかります。 更に1つ1つ書き込みしてしまうと極端に遅くなります。 配列で一括して読み書きしてみて下さい。 [VB6.0] Private Sub ExcelWrite(ByRef Datax() As Variant) xlSheet.Range("$A$1").Resize(UBound(Datax, 1), UBound(Datax, 2)).Value = Datax End Sub Private Function ExcelRead(ByVal Rows As Integer, Cols As Integer) As Variant() ExcelRead = xlSheet.Range("$A$1").Resize(Rows, Cols).Value End Function DAO とのパフォーマンス比較は…質問なんかしなくても 時間を計れば分かる事じゃないんですか?
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.