Berduş hocam belki sizinkindede çaloşır vbTab olarak gerçi space olarakta sizinkinde çalışıyor.
Tabii alttaki kod eğer sayfaya aktarınca nasıl sonuç verir denemedim açıkçası.
arr(say, 7) = vbTab & vbTab & Format(rng(i, 7), "#,##0.00")
arr(say, 7) = vbTab & vbTab & Format(rng(i, 7), "#,##0.00")