Do while～Loopステートメント

Do while～Loopステートメントとは、条件を出し、それを満たしている間は同じ処理を繰り返し行うステートメントです。

 

今回はエクセルに数値の異なる２つの値を入力し、比較しながら数値が同じになるまで値を加えていく処理を行います。

 

 

A列とB列にそれぞれ「左」 「右」として数値が入力されています。

これをどちらも50になるようDo while～Loopステートメントを使って値を加えていきます。

 

VBEを開いてコードを書き込んでいきましょう。

 

 

コードの役割は色分けしたとおりです。

赤と青で囲んであるコードが実行される処理です。

一通り実行したあとも条件を満たしている場合はもう一度初めから同じ処理を再度実行します。

 

実際にどのような処理が実行されていたのか、エクセルのシートを見ながらもう一度コードを実行してみましょう。

 

 

A3セルに１が加えられ、メッセージウィンドウで合計の数値が表示されました。

しかし右側の50にはまだ到達していないので、条件を満たしていないことになりA3の値が50より大きくなるまで同じ処理が実行されます。