文章pdf,上传到csdn
内容概要:本文档全面介绍了VBA(Visual Basic for Applications)编程的基础知识,内容涵盖了变量、数组、执行流程、条件分支、循环语句、过程与函数调用、引用传递与值传递、对象操作方法、范围选择等多个方面,并附带了大量的实例演示,便于读者理解与应用。
适用人群:适用于初学者,特别是那些希望利用VBA提高Excel工作效率的办公人士和技术爱好者。
使用场景及目标:无论是日常的数据整理,还是复杂报表的自动化制作,本教程都能提供必要的指导和支持,帮助读者快速掌握VBA核心技能,提升解决问题的能力。
其他说明:文档不仅详细解析了语法,还强调了实际应用,非常适合希望将理论转化为实践的学习者。同时,对于想要深入了解Excel底层机制和优化技巧的人来说,也是一个不可多得的好资料。
变量
外链图片转存失败,源站可能有防盗链机制,建议将图片保存下来直接上传
有点weird:静态变量
Sub demo()
Dim a As Integer
a = a + 6 ' 一般定义了整数变量,都会有赋初值的操作
Cells(1, 1) = a
End Sub
Sub static_demo()
Static a As Integer
a = a + 6
Cells(3, 1) = a '单元格的值不断增加
End Sub
数组 结构体
Sub demo()
Dim age(2) As Byte ' byte 0-255 无符号
age(0) = 20 ' 从0开始编号
age(1) = 30 ' 不是用[]取值
age(2) = 40
MsgBox age(0)
MsgBox agb(1)
End Sub
VBA没有结构体,但是C语言的结构体对理解VBA的对象模型很有帮助
执行顺序
if
Public Sub dmeo()
Dim nowtime As Double
nowtime = 0.8
If nowtime < 0.5 Then
MsgBox "早上好"
ElseIf nowtime >= 0.5 And nowtime < 0.75 Then
MsgBox "下午好"
Else
MsgBox "晚安"
End If
End Sub
do while
Public Sub dmeo()
Dim i As Integer
Dim sum As Integer
sum = 0
i = 0
Do While i <= 100
sum = sum + i
i = i + 1 ' 循环变量 + 1,不然成死循环
Loop
MsgBox sum
MsgBox i
End Sub
Public Sub dmeo()
Dim i As Integer
Dim sum As Integer
sum = 0
i = 0
Do '循环至少执行一次
sum = sum + i
i = i + 1 ' 循环变量 + 1,不然成死循环
Loop While i <= 100
MsgBox sum
MsgBox i
End Sub