いつもこのHPを参考にしており、大変助けられています。ありがとうございます。

EXCELについて相談です。
<やりたい事>
70ファイルのEXCELがあります。
このファイルはBG列まであり、行はそれぞれ違い10行〜7000行まであります。
このファイルを編集するので、編集後と編集前の相違点をチェックしたいです。
チェック項目は、「行数違い」「セルの色違い」「値違い」です。

「行数違い」はB列の途中に空白セルがないので、下記のようにして比較しようと思っています。
xlSheet.Range("B1").End(xlDown).Select      '最終行までスクロール
row = xlApp.ActiveCell.row    　　　　　　　'データのある最終行

「セルの色違い」「値違い」が悩んでいるところで、
xlSheet.Range("BG" & i).value　で値を取得して比較する方法を思いついたのですが、
データ量が多くて、時間がかかってしまいます。
10分以内(早ければ早いほどいい)で終わらせたいのですが、何か方法はないでしょうか？
よろしくお願いします。