工具/原料office Excel軟體具備一定的VB基礎更好方法/步驟

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

2、for……next結構 這個結構一般是這樣的：for i=初始值 to 結束值 step 步長值 ……next具體解釋一下，初始值指的是迴圈開始的值，結束值指的是迴圈結束的值，實質上就是i值得一個判斷，如果i值在起始值和結束值之間，那麼進入迴圈語句，然後i值每執行到next語句後會自動加一個步長值，直至i值超出了初始值到結束值這個範圍，迴圈才會結束。這裡要說明一下”step 步長值“往往是省略掉的，省略掉的話，步長取預設值為3下面將以一段小例項來具體說明這個結構的用法：例項：在sheet1工作表中一次輸出1到10這個數，顯示在第一列中。程式：Sub 迴圈語句()Dim i As IntegerFor i = 1 To 10 Cells(i, 1) = iNextEnd Sub

3、步長為+2的for迴圈結構 這裡我們看一下一個示例程式吧程式：Sub 迴圈語句()Dim i As IntegerFor i = 1 To 10 Step 2 Cells(i, 1) = iNextEnd Sub

4、步長為-1的for迴圈結構 這裡同樣的我們來看一下當step值為-1的時候，程式又會是如何的呢？看下面例項程式：Sub 迴圈語句()Dim i As IntegerFor i = 10 To 1 Step -1 Cells(i, 1) = iNextEnd Sub

5、for each……next結構 具體結構：For each 物件變數 in 物件集合 ……next具體解釋一下，這裡我們看到和上一個結構的而不同的是上面一種結構主要是數值變數，而這種結構是物件變數。什麼意思呢？each……in指的是在這個物件集合裡面，一次將每一個物件都遍歷一邊。同樣的道理，執行到next後物件自動指到下一個。具體我們來看一下下面的一個例項吧例項：給一個數據區域內的所有單元格賦值，從1開始。分析：顯然資料區域就是一個物件集合，單元格就是這個集合裡面的物件程式：Sub 迴圈語句()Dim i As IntegerFor Each c In Range("a1:c5") i = i + 1 c.Value = iNextEnd Sub

6、迴圈語句運用起來是很靈活的，上面只介紹了兩種迴圈語句的基本用法，迴圈語句是可以套用的，這個就需要結合具體情況來靈活運用了！下面我們用多迴圈語句巢狀來實現乘法口訣：程式：Sub 迴圈語句()Dim i, j As IntegerFor i = 1 To 9 For j = 1 To i Cells(i, j) = i & "*" & j & "=" & i * j NextNextEnd Sub