「エクセルで今回の場合は
GYOUの変数の型は指定しなくても大丈夫だけど
必須の場合もあるから
Dim で 変数の宣言をしておく癖を
今から身に着けておいてくれ。」
変数の型は こちら
今回は、数値の型だけでも
の４種類があります。
今回 GYOU は整数しか取り扱わないので
Integer か Long を指定します。
シートには１００万行ほどのセルが並んでいます。
つまり、Integerでは、最大値が32767では少なすぎるのがわかります。
今回の変数 GYOUに指定するのは Long
Dim GYOU As Long
と一行目に追加してください。