Excel上で取り消し線の付いた行を除く行をデータテーブルにしたいです。

[Yoichi]

@miwa_yamamoto

900行程の処理に20分程度かかり、

シートのすべての行を見に行ってるのではないでしょうか？

取り急ぎループの最大を900にしてみて試してみて、それでうまくいきそうなら
引数として最大値を渡すようにすれば良いように思えます。