- 12
- 0
- 约4.55千字
- 约 8页
- 2017-10-18 发布于河北
- 举报
VBA的变量含义和变量作用.pdf
VBA 的变量含义和变量作⽤
代码存在的位置:模块
VBA 代码必须存放在某个位置,这个地⽅就是模块。有两种基本类型的模块:标准
模块 类模块。模块中的每个过程或者是函数过程,或者是⼦程序概念.本课的最后部
分将讨论函数过程 ⼦程序的区别。
新术语:
模块:它是作为⼀个单元保存在⼀起的VBA定义 过程的集合。
类模块:VBA允许你创建⾃⼰的对象,对象的定义包含在类模块中。
你的⼤部分⼯作集中在标准模块中 (简称为模块)当录制宏时如果不存在模块,
EXCEL ⾃动创建⼀个。EXCEL VBA 不关⼼代码存放在哪⼀个模块中,只要代码
存在于打开的⼯作簿中即可。
对模块的概览
过程被定义为 VBA 代码的⼀个单元,过程中包括⼀系列⽤于执⾏某个任务或是进⾏
某种计算的语句。⼯作簿的每个过程都有唯⼀的名字加以区分。
有两种不同的过程:⼦程序 函数过程。⼦程序只执⾏⼀个或多个操作,⽽不返回数
值。当录制完宏查看代码时,所看到的就是⼦程序。宏只能录制⼦程序,⽽不能录制
函数过程。⼀个⼦程序的例⼦如下所⽰:
例:
Sub cmdSmallFont_Click()
With Selection .Font
.Name= Arial
.FontStyle= Regular
.Size= 16
End With
End sub
上⾯列出的过程实际上是⼀个事件过程。通过它的名字,就可以知道这是⼀个事件过
程。这个过程的名字是由⼀个对象的名字CmdSmallFont ⼀个事件的名字Click组成
的,两者之间⽤下划线分开。如果还不明⽩,可以告诉你,CmdSmallFont是⼀个命令
按钮的名字。也就是说,当单击这个命令按钮时,就会运⾏这个事件过程。
函数过程通常情况下称为函数,要返回⼀个数值。这个数值通常是计算的结果或是测
试的结果,例如False 或True .正如前⾯所说,可以⽤VBA创建⾃定义函数。实际上可
以在⼯作表上使⽤你创建的函数。下⾯是⼀个计算价格的10%为运费的简单例⼦。
简单的⽤户定义函数⽰例:
Public Function Shipping(Price)
Shipping = Price * 0 .1
End Function
请注意,这个函数使⽤⼀个参数 (Price) .⼦程序 函数都可以使⽤参数。不论Price的
值是多少,它都将决定运费额。Price 可以是数字 单元格引⽤。函数返回计算出来的
运费,这个函数可以⽤在单元格中。
A B
1 Price 100
2 Shipping =shipping(B 1)
创建过程
创建第⼀个过程需要两个基本步骤。⾸先,需要向⼯作簿中添加⼀个模块。接着需要
向模块中添加⼀个⼯程。对于创建的每⼀个应⽤程序,只需添加⼀次模块。可以使⽤
多个模块,但这是不必要的。某些开发者喜欢使⽤多个模块,以便根据他们的⽬的或
者窗体对过程进⾏组织。在本练习中,创建的过程只显⽰⼀个消息框。
在本练习中使⽤Msgbox是为了提供⼀个可见的例⼦,虽然我们还没有介绍过Msgbox
语句,但是在本例中将使⽤它。要创建该过程,请按如下步骤进⾏:
1、打开⼀个新⼯作簿。
2、选择 ⼯具 - 宏 - Visual Basic编辑器 ,打开VBA编辑器窗⼜。
3、在`VBA 编辑器的左⾯,可以看到 ⼯程资源管理器 窗⼜。在⼯程资源管理器窗⼜
的 Thisworkbook 上单击⿏标右键,选择 插⼊ - 模块 ,这样就将⼀个模块添加到应
⽤程序中了。(如果你没有看见 ⼯程资源管理器 窗⼜,可以按Ctrl+R)
4 、选择 插⼊ 过程 ,显⽰ 添加过程 对话框。
5、输⼊ 第⼀个⼯程 作为过程名字。在 类型 分组框中,确认选择了⼦程序 。单
击 确定 按钮。这样⼀个新的过程就添加到模块中了。可以在模块中看到以 PublicSub
第⼀个过程 ()开始,以End Sub结束的语句结构。
6、在过程中插⼊光标,输⼊以下语句并回车:
Msgbox 这是我的第⼀个过程
在输⼊Msgbox后,会⾃动弹出⼀个消息框告诉你有关这条命令的信息,称之为⾃动列
表技术。
输⼊完成的过程如下所⽰:
Public Sub 第⼀个过程 ()
Msgbox 这是我的第⼀个过程
End Sub
VBA对⼦程序 函数有如下的命名规则:
* 名字中可以包含字母数字 下划线。
* 名字中不能包含空格句号惊叹号,也不能包含字符@ $ # .
* 名字最多可以包含255个字符。
运⾏宏
您可能关注的文档
最近下载
- 医疗器械不良事件(共26张PPT)【26页】.pptx VIP
- 医疗器械不良事件培训(共54张PPT)【54页】.pptx VIP
- 广东省深圳市福田区重点中学2026届中考数学仿真试卷含解析.doc VIP
- 高维空间的时空紧致化.pdf
- 2026年深圳中考数学三轮复习冲刺试卷(附答案可下载).docx VIP
- 部编版初中语文八年级上册(下)文言文对比阅读(解析版).docx VIP
- 04 九年级上册-部编版初中语文文言文对比阅读(解析版).docx VIP
- 埋地管道结构稳定计算表格.xlsx VIP
- 2025内蒙古区直属机关遴选245名公务员笔试参考试题附答案解析.docx VIP
- 管道地基承载力验算.xls VIP
原创力文档

文档评论(0)