エクセルVBAで規定する範囲をループ
私たちは、定義された範囲をループプログラムを見て下記。
（「：A3 A1」）例えば、我々は、範囲内の数値を二乗したいとき。あなたは知っていたこともできます リンクをループダイナミックレンジ？状況：
ワークシート上のコマンドボタンを配置し、次のコード行を追加します。
1.まず、我々は2つの範囲オブジェクトを宣言します。私たちは、レンジRNGとセルオブジェクトを呼び出します。
Dim rng As Range, cell As Range
2.私たちは、範囲（ “：A3 A1″）とRangeオブジェクトのRNGを初期化します。
Set rng = Range("A1:A3")
次の各ループの追加3.。
For Each cell In rng Next cell
注：RNGとセルがランダムにここで選択されている、あなたは任意の名前を使用することができます。
あなたのコードの残りの部分でこれらの名前を参照することを忘れないでください。
4.次に、我々は、この範囲内の各セルを二乗。これを実現するために、ループに次のコード行を追加します。
cell.Value = cell.Value * cell.Value
あなたはシート上のコマンドボタンをクリックすると、結果：
5.あなたがランダムに選択された範囲内の各セルを確認したい場合は、単純に置き換える：
Set rng = Range("A1:A3")
：
Set rng = Selection
6.今、例えばレンジ選択（ “A1：A2を”）。
あなたはシート上のコマンドボタンをクリックすると、結果：
