掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ExcelApplication利用で時間がかかる。 (ID：27471)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
HOta様 if (iRow mod 21) = 0 then begin // R := IR + Trunc(IR/21) - 21; Clipboard.AsText := Clipboard.AsText + #13#10; //1個だけ // ExcelApplication2.ActiveWindow.ActiveCell.Cells.Item[R,1].pasteSpecial; // Clipboard.AsText := ''; //消去 // Inc(IR); //消去 end; end; ExcelApplication2.ActiveWindow.ActiveCell.Cells.Item[1,1].pasteSpecial; //[1,1]に finalize(Data); end; でうまくいきました。 家と会社でマシン速度が違うのですが、６５頁分１０分程かかっていたのが ２分ぐらいに短縮されました。 長い間本当にありがとうございました。 今後ともよろしくお願いいたします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.