> 30万行前後記載されている数列を読み込んでおります。

上限が分かっているのなら、たとえば 40万行などの巨大サイズを最初にドカッと確保し、
ループ中での ReDim Preserve を一切行わないようにしてみたらどうでしょうか?
事前確保であれば、そんなに遅くはならないはず…。


参考資料として：


🔹VBAのRedim Preserveは本当に遅いのか(データ型を指定しないと遅くなる)
https://vbabeginner.net/redim-preserve-really-slow/


🔹VBA 配列の速度比較 (ループ中に毎回 ReDim Preserve で +1 ずつ増やすと遅い)
https://howto-it.com/excelvbacollection.html


🔹【VB.NET】Redim・Redim Preserve・UBoundは古い！Generic.Listを使おう
https://www.totaltech365.net/entry/generic-list