VBA 変数宣言の注意

Dim i , j  As Long

だと、iは、varient型になる。

iも、Long にしたい場合、

Dim i As Long , j As Long

と宣言する。