エクセル２０１６で当番を決める表を作りました。イラストの表でA１２が１になると条件が揃います。現在はF９を押しています。スタートボタンを押してA１２が１になると停止するというようなマクロ？を組む事はできませんか。宜しくお願いします。

1にならない事があるかもしれない場合を

想定して最大500回繰り返し

Dim i

For i = 1 To 500

If Range(\u0026quot;A12\u0026quot;).Value = 1 Then Exit For

Application.Calculate

Next i