本節課主要講解語法篇的第七課,VBA當中的for_next循環語句的實際運用。根據每一筆單号的單價與數量,求出每單的金額。
效果如下:
代碼如下:
Sub fornext()
Dim omg!
'定義一個變量,類型為單精度類型
For omg = 2 To 16
'賦值循環次數/範圍為2-16,因為計算的表格行數從第二行到第16行
Sheet1.Cells(omg, 4) = Sheet1.Cells(omg, 2) * Sheet1.Cells(omg, 3)
'從單元格(2,4)開始計算,D2(2,4)=B2(2,2)*C2(2,3)
Next '循環
End Sub
注意問題:
1、主要為定義起始位置,把單元格所在區域用變量值來代替;
2、FOR...NEXT作為循環語句,與之前的DO...LOOP不同的地方是,for next有一個内置計數器,可以計數。
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!