VBA的常见语法整理 VBA语法 常见语法整理 VBA命令集合 VBA整理

1、 for循环

2、字符串连接符 &

Dim i
For i = 1 To 10
Cells(i, 2) = "第" & i & "行"
Next i

3、设定必须显式声明变量

Option Explicit

4、while循环

Dim j
j = 1
While Cells(j, 2) <> ""
Cells(j, 3) = j
j = j + 1
Wend

5、do while 循环

Dim j
j = 1
Do While Cells(j, 2) <> ""
Cells(j, 3) = j
j = j + 1
Loop

6、删除指定行(1:1为行号，必须为字符串形式)

Rows("1:1").Select
Selection.Delete shift:=xlUp

7、遍历全部工作表

Dim ws
For Each ws In Worksheets
Dim i
For i = 1 To 10
ws.Cells(i, 2) = "第" & i & "行"
Next i
Next ws
或
Dim h
For h = 1 To Worksheets.Count Step 1
Dim ws
Set ws = Worksheets(h)
Dim i
For i = 1 To 10
ws.Cells(i, 2) = "第" & i & "行"
Next i
Next h

8、修改特定工作表

Dim ws
Dim w1 As Worksheet
Set w1 = Worksheets(3)
Dim i
For i = 1 To 10
w1.Cells(i, 2) = "第" & i & "行"
Next i

9、添加一个工作表

Dim w2 As Worksheet
Set w2 = Worksheets.Add
w2.Cells(1, 1) = "new"

10、根据工作表名修改工作表

Dim w2 As Worksheet
Set w2 = Worksheets("Sheet2")
w2.Cells(1, 1) = "s2"