EXCEL VBArange(\u0026quot;S41\u0026quot;)にcntを書き込み、最大9000になったらまた、1からカウントUPさせていますが、cntがいくつになったらrange(\u0026quot;S41\u0026quot;) がパンクするとかエンストするとかがありますか? cnt = cnt + 1: Range(\u0026quot;S41\u0026quot;) = cnt If cnt \u0026gt; 9000 Then cnt = 6 End If if 文をしなくても、たぶんcntは最大で99,999までは行かないと推測してはいます。 if 文は不要ではないかと思っています。