範例3:計算1加到100的值,若值大於1000就跳出迴圈, 並將結果存入第1個工作表的儲存格A2內。 Sub Sum1to100() Dim i As Integer,sum As Integer For i = 1 ...
確定! 回上一頁