首頁  >  文章  >  專題  >  Excel VBA中for迴圈語句的用法是什麼?

Excel VBA中for迴圈語句的用法是什麼?

coldplay.xixi
coldplay.xixi原創
2020-06-28 11:07:0811616瀏覽

vb中for迴圈語句的用法:1、【for..next】語句,透過i判斷結構為【for i=初始值to 結束值step 步長值】;2、【for each. .next】語句,是物件變量,結構為【For each 物件變數in 物件集合】。

Excel VBA中for迴圈語句的用法是什麼?

vb中for迴圈語句的用法:

1、我們常用的for迴圈語句有兩種,一個是for ……next結構;一個是For each……next結構。這兩種結構主要都是針對多資料循環遍歷的時候用到的。那麼下面我將分別來介紹兩種循環結構的具體用法,首先還是要開啟VBA編輯器

Excel VBA中for迴圈語句的用法是什麼?

2、for…next結構

  這個結構通常是這樣的:

for i=初始值to 結束值step 步長值

    …

next

具體解釋一下,初始值指的是循環開始的值,結束值指的是循環結束的值,實質上就是i值得一個判斷,如果i值在起始值和結束值之間,那麼進入循環語句,然後i值每運行到next語句後會自動加一個步長值,直到i值超出了初始值到結束值這個範圍,循環才會結束。這裡要說明一下」step 步長值「往往是省略掉的,省略掉的話,步長取預設值為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迴圈結構

   這裡同樣的我們來看一下當step值為- 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結構

   具體結構:

For each 物件變數in 物件集合

   …

next

#具體解釋一下,這裡我們看到和上一個結構的而不同的是上面一種結構主要是數值變量,而這個結構是物件變數。什麼意思呢? 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迴圈語句的用法是什麼?

循環語句運用起來是很靈活的,上面只介紹了兩種循環語句的基本用法,循環語句是可以套用的,這個就需要結合具體情況來靈活運用了!

下面我們用多循環語句嵌套來實作乘法口訣:

程式:

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中文網其他相關文章!

陳述:
本文內容由網友自願投稿,版權歸原作者所有。本站不承擔相應的法律責任。如發現涉嫌抄襲或侵權的內容,請聯絡admin@php.cn