1)创建一个名为\显示你的名字\的子程序. 2)输入以下代码:
Public Sub 显示你的名字() Dim s名字 As String
s名字 = Inputbox(\请输入你的名字:\ Msgbox \你好\名字 End Sub
3)将鼠标放到过程中的任何地方,按下F5键运行过程,会显示一个输入框. 4)输入你自己的名字并按回车键,会显示一个消息框,显示的文字中包含你自己的名字.
5)单击\确定\按钮,返回过程中.
在Dim语句中不必提供数据类型.如果没有数据类型,变量将被定义为Variant类型,因为VBA中默认的数据类型是Variant.你知道这一点后,最初的反应也许是觉得应该不用自己决定数据类型,而将一切抛给VBA.这种观念是完全错误的.你必须决定选择使用何种数据类型。因为Variant数据类型占用存储空间较大（16或22字节）而且它将影响程序的性能。VBA必须辨别Variant类型的变量中存储了何种类型的数据。
4.4.3 变量命名的惯例
下表给出了推荐的变量命名惯例 数据类型 短前缀 长前缀 Array a ary Boolean f bin Byte b bit Currency c cur Double d dbl Date/Time dt dtm/dat Integer i int Long l lng Object o obj Single sng String s str Variant v var 表4-2 变量命名的前缀
4.4.4 使用数组
如果你使用过其他编程序语言,可能对数组已经比较熟悉了.数组是具有相同数据类型并共同享有一个名字的一组变量的集合.数组中的元素通过索引数字加以区分,定义数组的方法如下:
Dim array_name(n) As type (其中n是数组元素的个数) 例如,如果要创建保存10个学生名字的数组,可以用以下语句: Dim s学生名字(9) As Integer
注意,括号中的数字是9而不是10.这是因为在默认的情况下,第一个索引数字是0.数组在处理相似信息时非常有用.假设要处理15门考试成绩,可以创建15个独立的变量,这意味着要使用15个Dim语句。也可以创建一个数组来保存考试成绩，具体如下：
Dim s考试成绩（14） As Integer
声明数组时的另一种方法是不给定大小。可以在程序运行时定义其大小。通过创建动态数组就可以做到。例如，你的程序要创建一表格，可以提示用户输入表格的行和列的数目。声明动态数组的语法如下： Dim dyn_array() As type
对数组声明后可以在程序运行时用：ReDim语句指定数组的大小： ReDim dyn_array()(array_size)
参数array_size代表数组的新大小。如果要保留数组的数值，请在ReDim语句后使用保留字Preserve,具体语法如下： ReDim Preserve dyn_array(array_size)
4.4.5 变量赋值
声明变量后就可以给变量赋值。请注意下列语句中为数组变量赋值时索引数字的使用。
程序清单4-4
Dim i人数 As Integer Dim i考试成绩 As Integer Dim i As Integer
i人数 = inputbox(\输入学生的人数：\ ReDim Preserve i考试成绩(i数量) For i = 1 to i人数
i考试成绩(i) = inputbox(\输入考试成绩\
对模块的概览
过程被定义为VBA代码的一个单元，过程中包括一系列用于执行某个任务或是进行某种计算的语句。工作簿的每个过程都有唯一的名字加以区分。
有两种不同的过程：子程序和函数过程。子程序只执行一个或多个操作，而不返回数值。当录制完宏查看代码时，所看到的就是子程序。宏只能录制子程序，而不能录制函数过程。一个子程序的例子如清单4-1所示。 程序清单4-1 子程序的例子 Sub cmdSmallFont_Click() With Selection.Font .Name=\
.FontStyle=\.Size=16 End With End sub
上面列出的过程实际上是一个事件过程。通过它的名字，就可以知道这是一个事件过程。这个过程的名字是由一个对象的名字CmdSmallFont和一个事件的名字Click组成的，两者之间用下划线分开。如果还不明白，可以告诉你，CmdSmallFont是一个命令按钮的名字。也就是说，当单击这个命令按钮时，就会运行这个事件过程。
函数过程通常情况下称为函数，要返回一个数值。这个数值通常是计算的结果或是测试的结果，例如False 或True.正如前面所说，可以用VBA创建自定义
函数。实际上可以在工作表上使用你创建的函数。程序清单4-2是一个计算价格的10%为运费的简单例子。
程序清单4-2 简单的用户定义函数示例。 Public Function Shipping(Price) Shipping = Price * 0.1 End Function
请注意，这个函数使用一个参数（Price).子程序和函数都可以使用参数。不论Price的值是多少，它都将决定运费额。Price可以是数字和单元格引用。函数返回计算出来的运费，这个函数可以用在单元格中。 A B
1 Price 100
2 Shipping =shipping(B1)
4.2.1 创建过程
创建第一个过程需要两个基本步骤。首先，需要向工作簿中添加一个模块。接着需要向模块中添加一个工程。对于创建的每一个应用程序，只需添加一次模块。可以使用多个模块，但这是不必要的。某些开发者喜欢使用多个模块，以便根据他们的目的或者窗体对过程进行组织。在本练习中，创建的过程只显示一个消息框。
在本练习中创建的过程只显示一个消息框。在本练习中使用Msgbox是为了提供一个可见的例子，虽然我们还没有介绍过Msgbox语句，但是在本例中将使用它。要创建该过程，请按如下步骤进行： 1）打开一个新工作簿。
2）选择\工具\宏\编辑器\，打开VBA编辑器窗口。 3）在`VBA编辑器的左面，可以看到\工程资源管理器\窗口。在工程资源管理器窗口的\上单击鼠标右键，选择\插入\模块\，这样就将一个模块添加到应用程序中了。(如果你没有看见\工程资源管理器\窗口，可以按Ctrl+R)
4）选择\插入\过程\，显示\添加过程\对话框。
5）输入\第一个工程\作为过程名字。在\类型\分组框中，确认选择了\子程序\。单击\确定\按钮。这样一个新的过程就添加到模块中了。可以在模块中看到以 Public Sub 第一个过程（）开始，以End Sub结束的语句结构。 6）在过程中插入光标，输入以下语句并回车： Msgbox \这是我的第一个过程\
在输入Msgbox后，会自动弹出一个消息框告诉你有关这条命令的信息，称之为自动列表技术。输入完成的过程如下所示： Public Sub 第一个过程（） Msgbox \这是我的第一个过程\End Sub
VBA对子程序和函数有如下的命名规则： * 名字中可以包含字母数字和下划线。
* 名字中不能包含空格句号惊叹号，也不能包含字符@ & $ #. * 名字最多可以包含255个字符。
4.2.2 运行宏
创建这个过程后，可以运行一下。运行一个过程有几种方法：可以直接使用\运行\菜单，\运行子程序/用户窗体\工具栏按钮或按下F5键。要运行一个过程，可以按照如下步骤：
1）单击\运行子程序/用户窗体\工具栏按钮，过程执行并显示一个消息框。
2）单击消息框之中的\确定\按钮，关闭该消息框。
代码存在的位置：模块
VBA代码必须存放在某个位置，这个地方就是模块。有两种基本类型的模块：标准模块和类模块。模块中的每个过程或者是函数过程，或者是子程序概念.本课的最后部分将讨论函数过程和子程序的区别。 新术语：
模块：它是作为一个单元保存在一起的VBA定义和过程的集合。 类模块：VBA允许你创建自己的对象，对象的定义包含在类模块中。
你的大部分工作集中在标准模块中（简称为模块）当录制宏时如果不存在模块，EXCEL自动创建一个。EXCEL和VBA不关心代码存放在哪一个模块中，只要代码存在于打开的工作簿中即可。
使用用户窗体
如果希望创建专业级的应用程序,并且方便用户输入数据,那么应该使用用户窗体.用户窗体可以作为程序的对话框和窗口.向用户窗体添加控件基本类似于向工作表添加控件,然而第一步要创建一个用户窗体.这可以通过VBA编辑器实现.具体按以下步骤操作:
1)打开\工作簿,选择\工具\宏\编辑器\打开VBA编辑器. 2)在VBA编辑器中选择工具栏上的\插入用户窗体\按钮或者选择\插入\菜单,从下拉菜单中选择\用户窗体\
现在,VBA编辑器中出现一个名为\的窗体,\控件工具箱\同时出现,在其中有许多已经熟悉的控件,另外还有一些新的控件. 这些新的控件是:
A)切换按钮:该控件如果被选中,那么会保持被按下的状态.如果再次单击它就恢复为没有按下的状态.EXCEL工具栏中有几个这样的按钮,例如:\全屏显示\\加粗\下划线\以及\窗体\工具栏中的\切换网格\等.
B)选项卡条(TabStrip):它是包含多个选项卡的控件.通常用来对相关的信息进行组织或分类.例如:你也许希望用选项卡条来显示各个地区的销售信息,可以给每个地区设置一个选项卡.在默认时,选项卡包含两页,分别叫做TAB1和TAB2,可以添加更多的选项卡.
C)多页:外观类似选项卡条,是包含一页或多页的控件.选项卡条给人相似的外观,而多页控件的各页包含各自不同的控件,有各自不同的布局.多页的例子很多,例如:\设置控件格式\对话框和\工具\菜单中的\选项\对话框.以及\格式\菜单中的\单元格...\对话框.
D)图像控件:它允许向窗体上放置图片.图片格式须为 :*.bmp,*.cur,*.gif,*.ico,*.jpg,*.wmf.
F)RefEdit:这是工具箱中默认情况下的最后一个控件。它外观象文本框，通过这个控件可以将用户窗体折叠起来，以便选择单元格区域。还记得在使用fx\粘贴函数\时的情况吗？
通过实践，我们会逐渐掌握每个控件的特性，这的确需要花时间，但不必死记硬背。
在对用户窗体设计得满意时，可以对其进行预览，方法是在VBA编辑器中选择该窗体，单击\运行\菜单中的三角符号\运行子过程/用户窗体\，三角符号在VBA工具栏上也可能看得到，旁边是一个垂直的等于符号，最右边是个小正方形符号，它们类似于录音机上的按钮。运行窗体的另一个方法是按F5键。
小结：学习完本学时后，我们具备了用于程序界面设计的基本知识。我们对控件不在感到陌生，也明白如何向工作表和窗体添加控件,但控件的内容很多,需要边用边理解.此后，我们将从界面转移到学习编写代码，并最终将二者融合。让我们准备好学习编程吧！
给控件命名
当创建一个控件时EXCEL会自动给它指定一个名字,但不便于理解和记忆,为控件取名的方法基本和给单元格或区域取名的方法相同.选中某个控件,再在位于公式栏上的\名字\编辑框输入控件名字.这样就给控件更改了名字.
设置控件的特性
设置控件的特性,可以按以下步骤操作:
1)选中先前创建的复选框控件,如果没有马上创建一个. 2)右击该控件,选择\控制\选项卡. 3)在\单元格链接\中输入A1并确定. 4)单击任意单元格,退出设置.
5)用鼠标左键单击复选框,A1出现TRUE,这意味着该控件被选中.再次单击该控件,A1出现FALSE.
6)选择刚才创建的滚动条控件.并调出\设置控件格式\对话框. 7)在\单元格链接\中输入A3并确定.
8)在滚动条外任意单元格单击鼠标左键,使滚动条不被选择.
9)用鼠标单击滚动条上的箭头,则A1的数值增加1,继续单击则A1的数值继续增加.
10)保存并关闭该工作簿.
向工作表添加控件
用EXCEL设计界面十分简单,要将控件添加到工作表上,可以按以下步骤操作: