ホームページ  >  記事  >  トピック  >  Excel VBAのforループ文の使い方は何ですか?

Excel VBAのforループ文の使い方は何ですか?

coldplay.xixi
coldplay.xixiオリジナル
2020-06-28 11:07:0811591ブラウズ

vb での for ループ文の使用法: 1. [for..next] 文、i で判断される構造は [for i=初期値から終了値までのステップ ステップ値]; 2. [for each. .next] ステートメントはオブジェクト変数であり、その構造は [オブジェクト コレクション内の各オブジェクト変数に対して] です。

Excel VBAのforループ文の使い方は何ですか?

vb での for ループ ステートメントの使用:

1. 一般的に使用される for ループ ステートメントは 2 つあります。は for…next 構造、もう 1 つは For each…next 構造です。これら 2 つの構造は主に、複数のデータをループするときに使用されます。そこで以下では 2 つのループ構造の具体的な使い方をそれぞれ紹介していきます まず、VBA エディタ

Excel VBAのforループ文の使い方は何ですか?

2, for...next# を開く必要があります。 ## 構造

この構造は一般に次のようになります。

for i=初期値から終了値までのステップ ステップ値

……

next

詳しく説明すると、初期値はループの開始時の値、終了値はループの終了時の値を指し、要するに i が価値があるかどうかの判定です。 i 値が開始値と終了値の間にある場合、ループ ステートメントを入力すると、次のステートメントが実行されるたびに、i 値によってステップ値が自動的に追加されます。ループは、i 値が開始値を超えるまで終了しません。初期値から終了値までの範囲。なお、「ステップ値」は省略されることが多く、省略した場合のステップのデフォルト値は1です。以下では、小さな例を使用して、この構造体の使用法を具体的に説明します。

例: Sheet1 ワークシートに一度に 1 ~ 10 の数値を出力し、最初の列に表示します。

プログラム:

Sub 循环语句()
Dim i As Integer
For i = 1 To 10
  Cells(i, 1) = i
Next
End Sub

Excel VBAのforループ文の使い方は何ですか?

ステップ サイズ 2 の For ループ構造

ここでサンプル プログラムを見てみましょう

プログラム:

Sub 循环语句()
Dim i As Integer
For i = 1 To 10 Step 2
    Cells(i, 1) = i
Next
End Sub

Excel VBAのforループ文の使い方は何ですか?

ステップ サイズ -1

の For ループ構造。ここでは、次の場合と同じことを見ていきます。ステップ値は - 1 ですが、手順はどのようになりますか?

以下のプログラム例を見てください:

Sub 循环语句()
Dim i As Integer
For i = 10 To 1 Step -1
    Cells(i, 1) = i
Next
End Sub

Excel VBAのforループ文の使い方は何ですか?##3、

for each...next

構造 Specific構造:

オブジェクト コレクション内の各オブジェクト変数について

……

次の

詳しく説明します。ここでは、前の構造とは異なる点が見られます。上記の構造体は主に数値変数ですが、この構造体はオブジェクト変数です。それはどういう意味ですか? Each...in は、このオブジェクト コレクション内の各オブジェクトを一度に片側ずつ移動することを指します。同様に、next を実行すると、オブジェクトは自動的に次のオブジェクトを指します。具体的には、以下の例を見てみましょう。

例: データ範囲内のすべてのセルに 1 から始まる値を割り当てます。

分析: 明らかに、データ領域はオブジェクトのコレクションであり、セルはこのコレクション内のオブジェクトです

プログラム:

Sub 循环语句()
Dim i As Integer
For Each c In Range("a1:c5")
  i = i + 1
  c.Value = i
Next
End Sub

Excel VBAのforループ文の使い方は何ですか?
ループ文は使い方が非常に柔軟です。上記では 2 種類のループ文の基本的な使い方を紹介しました。ループ文は応用可能です。状況に応じて柔軟に使用する必要があります。

以下では、マルチループ ステートメントのネストを使用して乗算式を実装します。

プログラム:

Sub 循环语句()
Dim i, j As Integer
For i = 1 To 9
  For j = 1 To i
    Cells(i, j) = i & "*" & j & "=" & i * j
 Next
Next
End Sub

Excel VBAのforループ文の使い方は何ですか?推奨チュートリアル: "

Excel 基本チュートリアル

>>

以上がExcel VBAのforループ文の使い方は何ですか?の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。

声明:
この記事の内容はネチズンが自主的に寄稿したものであり、著作権は原著者に帰属します。このサイトは、それに相当する法的責任を負いません。盗作または侵害の疑いのあるコンテンツを見つけた場合は、admin@php.cn までご連絡ください。