- Range单元格对象
目的:A1:A100单元格都写入1
Range(“a1”)表示的是单元格A1
这样就可以快速填充了
#shishi为自己命名的宏名称
#Range("a1")表示单元格A1
#VBA中不用缩进也可以执行,但为了方便查看,一般个人习惯会选择缩进
Sub shishi()
Dim i As Integer '定义变量为整数
For i = 1 To 100 '循环100次
Range("A" & i) = 1 '选中单元格A1
Next
End Sub
for循环中默认步长step是1,可以给step传递参数规定步长
代码及其运行结果如下:
IF 语法格式:
IF XXX Then
XXX #这个是符合条件执行的语句
Else
XXX #这个是不符合条件执行的语句
Endif
具体操作代码及结果如下图:
多层级的if语法如下:含义同上
IF 条件 Then
执行语句
Elseif 条件 Then
执行语句
Else
执行语句
Endif
- IF函数过程控制
Range ("A" & 2).Select '选中单元格A2
Selection.EntireRow.Delete 'A2单元格所在的行
- IF退出for循环
For i = 1 To 10
If Range ("A" & i) = "男" Then
Exit for '该语句表示条件满足时退出本次for循环
Endif
Next