第一,认识private sub和sub过程
Excel VBA里,我们会接触到private sub私有过程和sub过程。前者private sub是私有过程,sub是公共过程。过程也有私有和公共之分。
想把一个过程声明为公共过程,使用:Public Sub 过程名;其中的Public就是公共过程的标识牌。
如果想声明为私有过程,则:Private Sub 过程名;其中的Private就是私有过程的标识牌。
如果省略前面的Public,只写sub 过程名,就是公共过程。
第二,private sub和sub过程的区别
private sub和sub过程有什么区别呢?VBA的过程主要包括sub过程和function过程两种。sub过程不可以返回值,function过程可以返回值。比如我们经常录制的宏就是一个简单的sub过程,使用录制宏功能只能生成sub过程的代码。
private sub 和sub过程都是在模块中使用。下面我们具体看看private sub私有过程和sub过程的使用和区别。
Private Sub与Sub的区别是什么?完整地说,应该是Private Sub与Public Sub的区别是什么。(Sub 实际上是省略了Public关键字)。
Sub过程:在一程序内执行特殊任务的过程,不返回显式值。Sub 过程以Sub 语句开头,以 End Sub 语句结尾。
Sub 语句主要是声明子过程的名称、参数、以及构成其主体的代码。其语法如下:
[Private | Public | Friend] [Static] Sub name [(arglist)]
[statements]
[Exit Sub]
[statements]
End Sub
注:[]中间的参数表示可选。可以不输入,则按默认设置进行。
Sub 语句的各部分详述如下:
Private:可选的。表示只有在包含其声明的模块中的其它过程可以访问该 Sub 过程。
Public:可选的。表示所有模块的所有其它过程都可访问这个 Sub 过程。 如果在包含 Option Private 的模块中使用,则这个过程在该工程外是不可使用的。
Friend:可选的。只能在类模块中使用。表示该 Sub 过程在整个工程中都是可见的,但对对象实例的控制者是不可见的。
Static:可选的。表示在调用之间保留 Sub 过程的局部变量的值。Static 属性对在 Sub 外声明的变量不会产生影响,即使过程中也使用了这些变量。
Name:必需的。Sub 的名称;遵循标准的变量命名约定。
Arglist:可选的。代表在调用时要传递给 Sub 过程的参数的变量列表。多个变量则用逗号隔开。
Statements:可选的。Sub 过程中所执行的任何语句组。
如果没有使用 Public、Private 或 Friend 显式指定,Sub 过程按缺省情况就是公用的。
第三,private sub和sub过程的写法
一个子过程的声明语句可以有以下多种写法:
第一:
Public Sub AA()
MsgBox "AA"
End Sub
第二:
Private Sub BB()
MsgBox "BB"
End Sub
第三:
Sub CC()
MsgBox "CC"
End Sub
以上三个过程的区别在于过程AA使用了Public语句,使过程成为工程级别的过程,在当前工程中任何模块都可以调用。过程BB使用了Private语句,则为模块级别的过程,只能当前模块可以调用此程序。过程CC使用了缺省设置,它的级别等同于过程AA。
Public sub和Private sub只能选一个,选择了Public sub就不能选择Private sub,反之亦然。一个工作薄中一个过程被申明为Public sub后,表明声明的过程是一个公共过程,一个过程被申明为公共过程之后,就表明该工作薄中所有的模块中的其它的过程都可以访问这个过程。
Private sub过程只有同一个模块中的其它过程才能访问。
private sub 和sub过程在调用方面的区别:我们在excel工作表中使用快捷键“Alt+F8”打开宏对话框,只能看到过程AA和过程CC。也就是说private sub过程是不会显示在宏对话框里面的。
第四,private sub和sub过程的调用方法
也就是从一个过程执行另一个过程的方法:
Sub 公共()
MsgBox "部落窝论坛:www.blwbbs.com欢迎你。"
End Sub
Private Sub 私有()
MsgBox "这是我的窝窝私人空间。"
End Sub
上面分别是sub和private sub过程。下面我们来讲讲调用方法。
调用方法一:直接使用过程名
1.调用sub 公共()
Sub 调用()
公共
End Sub
2.调用Private Sub 私有()
Sub 调用()
私有
End Sub
调用方法二:使用call调用
在过程名称前使用call关键字:call 过程名
Sub 调用()
Call 公共
Call 私有
End Sub
调用的两个过程写在一起,先执行第一个再执行第二个。
调用方法三:利用Application对象的Run方法:Application.Run 过程名
Sub 调用()
Application.Run "公共"
End Sub
过程名称也可以是字符串变量,比如下面这样写:
Sub 调用()
Dim a As String
a = "私有"
Application.Run a
End Sub