/ / Excel VBAでパターンを作成する

Excel VBAでパターンを作成する

以下では、 Excel VBA それ パターンを作成する.

状況:

Excel VBAでパターンを作成する

ワークシートにコマンドボタンを配置し、次のコード行を追加します。

まず、Integer型の2つの変数を宣言します。 1つはi、もう1つはjという名前です。

Dim i As Integer, j As Integer

2.次に、2つのFor Nextループを追加します。

For i = 1 To 5 Step 2
    For j = 1 To 5 Step 2

3.次に、セルの背景色を明るい灰色に変更する行を追加します。

Cells(i, j).Interior.ColorIndex = 15

注:ColorIndex番号15(ライトグレー)ではなく、任意のColorIndex番号を使用できます。

4. 2つのFor Nextループを閉じます。

    Next j
Next i

5.プログラムをテストします。

これまでの結果。

パターン結果を非常にクレート化する

たとえば、i = 1およびj = 1の場合、Excel VBAi = 1およびj = 3の場合、ExcelのVBAカラーのセル(1,3)、i = 1およびj = 5の場合、Excel VBAの色セル(1,5)、 i = 3(ステップ2)およびj = 1の場合、Excel VBAはセル(3,1)などに色付けします。

6.私たちはほとんどそこにいる。 私たちがする必要があるのは、すでに着色されているセルの右下に1行下1列分オフセットされているセルに色を付けることです。ループに次のコード行を追加します。

Cells(i, j).Offset(1, 1).Interior.ColorIndex = 15

7.プログラムをテストします。

結果:

パターン結果を作成する

また読む: