[算表] VBA基本概念

楼主: zzatr (我还小)   2017-12-15 22:36:05
软件: EXCEL
版本: 2016
大家好 看书自学excel vba有个基本概念不懂
例如1到100能被3整除的数字依序写入A栏
Sub mod3()
Dim i As Integer
xrow = 1
For i = 1 To 100
If i Mod 3 = 0 Then
Cells(xrow, "A").Value = i
xrow = xrow + 1
End If
Next
End Sub
那我把xrow = xrow + 1和 End If 对调 会造成每三列才会出现数字
原因为何?谢谢!
Sub mod3()
Dim i As Integer
xrow = 1
For i = 1 To 100
If i Mod 3 = 0 Then
Cells(xrow, "A").Value = i
End If
xrow = xrow + 1
Next
End Sub
作者: soyoso (我是耀宗)   2017-12-15 22:39:00
因不管i mod 3 =0是否为0,xrow都会进行累加以原文范例,下面的写法,和cells(xrow,"a")改为cells(i,"a")是相同的
作者: newacc (XD)   2017-12-15 23:02:00
按F8一步一步看能更清楚你的code在干麻
楼主: zzatr (我还小)   2017-12-15 23:16:00
我用ne大方法看懂so大说啥了,谢谢!所以xrow = xrow + 1放在if里代表整除才换行,If外就会每次都换行 对吧?!
作者: soyoso (我是耀宗)   2017-12-15 23:22:00
如原po回文所述
楼主: zzatr (我还小)   2017-12-15 23:25:00
谢谢你们!

Links booklink

Contact Us: admin [ a t ] ucptt.com