最新VBA最最精典的教程(基础入门)教学讲义ppt
合集下载
ppt_VBA编程初步.pdf
一、PowerPoint 2003 应用程ห้องสมุดไป่ตู้体现“交互性”功能简介 PowerPoint 是 Office 办公套件中的演示文稿程序。其基本功能可以归纳为： (1)它可以看作是一个媒体集成平台，能够集成文本、图形、图片、表格、声音、视 频、动画等多种媒体元素，并有多种演播方式； (2)它提供翻页动画和对象动画，使得页面和其中的元素能够“动”起来，产生良好的 视觉效果； (3)它提供现成的设计模板，几分钟就能让你创建一个清楚简洁美观的演示文稿。 如何体现出具有交互性能的课件，下面主要对母版、触发器、动作路径的运用作一个 简要的说明,对制作交互式课件很有作用 。 1. 幻灯片母版 在同一演示文稿中我们可以应用多个不同的设计模板，使我们的演示文稿界面风格 统一、美观又有所变化。 而现在所说的“幻灯片母版”， 与设计模板有所不同，如果想 在整个课件每一页都统一显示某个“按钮”或“图片”等信息，则需要在“幻灯片母版”上进 行设置。PowerPoint 2003 版进入 幻灯片母版后，可以对母版进行编辑。幻灯片母版
通常 设计一些对整个课件中每一个幻灯片都需要的文字信息、命令按钮、幻灯片背景 图片、背景颜色等。
2. 触发器的设置 触发器同样是 2003 及以上版本的一个新增功能。它存在于对象自定义动画的“计时” 选项中，在放映视图中，只有当鼠标单击触发对象时，才开始播放该对象。在播放幻灯 片时，通过“点击鼠标”来呈现对象的方法不能很好地控制“对象”出现的顺序，所以我们 可以用“触发器”这个功能开发某个对象的呈现过程，比通常通过“点击鼠标”来呈现对象 的方法好。利用“触发器”可以制作交互性强的幻灯片，如制作：选择题、判断题，弹出 式菜单等。 3. 路径动画 对象动画除了分为进入、强调、退出等三种传统自定义动画方式外，在 PowerPoint 2003 版中还新增了“路径动画”。动作路径是一种不可见的轨迹，我们可以将幻灯片上的 图片、文本行或形状等项目放在动作路径上，使它们沿着动作路径运动。例如，我们可 以使用系统提供的各种预设路径（如弹簧形、心跳形），或我们自己手绘路径，将文本 或图形对象从幻灯片上的一个位置移动到另一个位置；我们还可以对路径进行编辑和修 改，以符合我们的需要。
通常 设计一些对整个课件中每一个幻灯片都需要的文字信息、命令按钮、幻灯片背景 图片、背景颜色等。
2. 触发器的设置 触发器同样是 2003 及以上版本的一个新增功能。它存在于对象自定义动画的“计时” 选项中，在放映视图中，只有当鼠标单击触发对象时，才开始播放该对象。在播放幻灯 片时，通过“点击鼠标”来呈现对象的方法不能很好地控制“对象”出现的顺序，所以我们 可以用“触发器”这个功能开发某个对象的呈现过程，比通常通过“点击鼠标”来呈现对象 的方法好。利用“触发器”可以制作交互性强的幻灯片，如制作：选择题、判断题，弹出 式菜单等。 3. 路径动画 对象动画除了分为进入、强调、退出等三种传统自定义动画方式外，在 PowerPoint 2003 版中还新增了“路径动画”。动作路径是一种不可见的轨迹，我们可以将幻灯片上的 图片、文本行或形状等项目放在动作路径上，使它们沿着动作路径运动。例如，我们可 以使用系统提供的各种预设路径（如弹簧形、心跳形），或我们自己手绘路径，将文本 或图形对象从幻灯片上的一个位置移动到另一个位置；我们还可以对路径进行编辑和修 改，以符合我们的需要。
认识VBA及其应用 ppt课件
ppt课件
1
VBA操作环境-续
Step5：VBA的物件导向式语法，有非常多的方法及属性，其中 各有不同的参数，不用强记，可以在属性或方法的字上(例如 RGB)按右键，叫出快显功能表，选择「列出属性或方法」。
ppt课件
1
VBA操作环境-续
Step6：就可直接跳到最接近的属性或方法项下，按 一下，就会出现相关的在线说明，可以复制说明档 上面的程序，直接拿过来用哦！
ppt课件
1
VBA操作环境-续
Step9：我们先来看一个设定字型格式变化的程序，都在每 一行后面有说明注解(注解以’为开始)。
ppt课件
1
VBA基本结构-程序或函数
一般我们用VBA最多的就是程序或函数了，程序是一连串可执行的 指令结合在一起，例如前一章所录制的巨集，主要目的是让多个重 复的动作在一起执行，减少我们操作的时间；而函数则是根据使用 者传入的参数，做一些运算后传回一个结果的值，像我们在第6章及 第9章用的函数就是这样，我们赶快来试试看！ Step1：执行[插入/程序]。 Step2：在[新增程序]交谈窗，输入名称为「leapyear」，型态为 「Sub」表示为一个「程序」程序。 Step3：按确定后，自动在程序视窗加入了一段定义程序的宣告与结 束指令，我们可以开始依据需要在这个程序中间加入我们需要的程 序指令了！
ppt课件
1
VBA操作环境-续
Step8：输入程序时请用小写英文即可，它会自动帮你转成大小写，以 及用颜色区分，蓝色为VBA与法的保留字或关键字，不可拼错，黑色为 程序的变量、宣告或陈述，而绿色则是注解。如果我输入「if x1=40」 按[Enter]键，立刻会告诉你错误讯息，并告诉你怎么做，而且用红色的 字标示出错误的那一列，是不是很方便，刚开始只要没出现红色的字， 表示程序没有大错，就可以执行了。
《VBA应用基础》PPT课件
使重复的任务自动化。 将Office作为开发平台，进行应用软件开发。 对数据进行复杂的操作和分析。
用Office作为开发平台有以下优点：
VBA程序只起辅助作用。许多功能Office已经提供，可以直 接使用，简化了程序设计。
通过宏录制，可以部分地实现程序设计的自动化，大大提高 软件开发效率。
3.1 用录制宏的方法编写VBA程序 3.1.2 宏的录制与保存
录制宏：
启动Excel。 在“工具”→“宏”菜单中选择“录制新宏”命令。 在“录制新宏”对话框中输入宏名，单击“确定”
按钮。 进行需要的操作。 单击“停止录制”工具栏的“停止录制”按钮，结
束宏录制过程。也可以选择“工 具”→“宏”→“停止录制”菜单命令结束宏录制。
1．变量 程序运行时，变量的值可以改变。 可以用变量来存储数据或对象。 【例3-1】在宏代码中使用变量。
2. 代码编辑 删除多余的语句、属性和参数。 加入判断或循环等无法录制的语句。 使用字符串连接运算符“&”。 循环控制语句For...Next的语法、执行过程、注意事项。 宏的录制、编辑、运行等操作还可以通过“Visual Basic”工具栏进
行。 在“工具”→“宏”菜单中选择“Visual Basic 编辑器”命令，或
3.1 用录制宏的方法编写VBA程序 3.1.2 宏的录制与保存
执行宏：
选择“工具”→“宏”→“宏”菜单命令，在“宏” 对话框中选择一个宏名，单击“执行”按钮。
保存宏：
将宏保存在当前工作簿或新工作簿，只有该工作簿 打开时，相应的宏才可以使用。
如果需要让某个宏在多个工作簿都能使用，就应当 将宏保存于个人宏工作簿中。
单命令，在“宏”对话框，选择宏，再单击 “选项”按钮，进行设置。
用Office作为开发平台有以下优点：
VBA程序只起辅助作用。许多功能Office已经提供，可以直 接使用，简化了程序设计。
通过宏录制，可以部分地实现程序设计的自动化，大大提高 软件开发效率。
3.1 用录制宏的方法编写VBA程序 3.1.2 宏的录制与保存
录制宏：
启动Excel。 在“工具”→“宏”菜单中选择“录制新宏”命令。 在“录制新宏”对话框中输入宏名，单击“确定”
按钮。 进行需要的操作。 单击“停止录制”工具栏的“停止录制”按钮，结
束宏录制过程。也可以选择“工 具”→“宏”→“停止录制”菜单命令结束宏录制。
1．变量 程序运行时，变量的值可以改变。 可以用变量来存储数据或对象。 【例3-1】在宏代码中使用变量。
2. 代码编辑 删除多余的语句、属性和参数。 加入判断或循环等无法录制的语句。 使用字符串连接运算符“&”。 循环控制语句For...Next的语法、执行过程、注意事项。 宏的录制、编辑、运行等操作还可以通过“Visual Basic”工具栏进
行。 在“工具”→“宏”菜单中选择“Visual Basic 编辑器”命令，或
3.1 用录制宏的方法编写VBA程序 3.1.2 宏的录制与保存
执行宏：
选择“工具”→“宏”→“宏”菜单命令，在“宏” 对话框中选择一个宏名，单击“执行”按钮。
保存宏：
将宏保存在当前工作簿或新工作簿，只有该工作簿 打开时，相应的宏才可以使用。
如果需要让某个宏在多个工作簿都能使用，就应当 将宏保存于个人宏工作簿中。
单命令，在“宏”对话框，选择宏，再单击 “选项”按钮，进行设置。
VBA最最精典的教程(基础入门)
为宏指定快捷键
你也许希望为经常使用的宏指定快捷键。当给宏指定了快捷键后， 就可以用快捷键来执行宏，而不必通过“工具”菜单。
※注意：当包含宏的工作簿打开时间， 为宏指定快捷键会覆盖EXCEL默认的快捷键。
可以在创建宏时指定快捷键，也可以在创建后再指定。 要在创建（录制）宏时指定快捷键，只须在录制宏时 在输入宏名后，在“快捷键”文本框中输入相应的键。
2021/2/27
如果该文件存在，则每当EXCEL 启动时会自动将此文件打开 并隐藏在活动工作簿后面
如果你要让某个宏在多个工作簿 都能使用，那么就应当创建 个人宏工作簿， 并将宏保存于其中。
个人宏工作簿
• 试着练:
• 1）建立一个名为“HOUR2”的工作簿，选择“工具”-“宏”-“录制新宏”,显 示“录制新宏”对话框。
Sub 改变颜色() ' ' 改变颜色 Macro ' xw 记录的宏 2000-6-10 '
' With Selection.Interior .ColorIndex = 3 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With End Sub
例如：把CTRL+C指定 给某个宏，那么CTRL+C 就不再执行复制命令。
录制宏后指定快捷键也很简单，只需选择“工具”-“宏”，显示“宏” 对话框，选择要指定快捷键的宏，再单击“选项”按钮，通过“选项” 对话框进行设置。
2021/2/27
决定宏保存的位置
• 宏可保存在三种可能的位置：
• 1）当前工作簿。（只有该工作簿打开时，该宏才可用。） • 2）新工作簿。 • 3）个人宏工作簿。
第十章VBA程序设计基础ppt课件
页的标题、隐藏和显示指定页。
Me.xxk.Pages.Item(2).SetFocus Me.xxk.Pages.Item(1).Caption = "cc" Me.xxk.Pages.Item(0).Visible = False
34
10.3 VBA面向对象编程基础
Access应用程序内置对象
32
10.3 VBA面向对象编程基础
图片框（image）
一般选择链接形式显示图片，图片显示用缩放。 动态更改图片：
Me.Image22.Picture = “E:\教学资源\1.jpg”，要给出 图片的路径。
33
10.3 VBA面向对象编程基础
分页控件（选项卡控件）
重要属性： Pages属性，主要通过它指定新当前页，修改
31
10.3 VBA面向对象编程基础
列表框（List）
除了外观形式外，常用属性方法与组合框大体 类似。
特色属性：
多重选择属性：Me.List18.MultiSelect，值是0，1， 2，但是运行只读属性，只能在运行之前设置。
判断列表项是否被选中属性：Me.List18.Selected(i)， 返回对应序号的列表值是否被选中。
读：＝msgbox（me.text1.value） 赋值：me.Text1.value＝“你好啊”
设置或者访问文本框被选中内容
Me.text3.setfocus Me.Text3.SelStart = 2 Me.Text3.SelLength = 2 MsgBox (Me.Text3.SelText)
22
10.2 模块基础
窗体按钮事件中调用模块过程或函数：
用表达式生成器选择
23
Me.xxk.Pages.Item(2).SetFocus Me.xxk.Pages.Item(1).Caption = "cc" Me.xxk.Pages.Item(0).Visible = False
34
10.3 VBA面向对象编程基础
Access应用程序内置对象
32
10.3 VBA面向对象编程基础
图片框（image）
一般选择链接形式显示图片，图片显示用缩放。 动态更改图片：
Me.Image22.Picture = “E:\教学资源\1.jpg”，要给出 图片的路径。
33
10.3 VBA面向对象编程基础
分页控件（选项卡控件）
重要属性： Pages属性，主要通过它指定新当前页，修改
31
10.3 VBA面向对象编程基础
列表框（List）
除了外观形式外，常用属性方法与组合框大体 类似。
特色属性：
多重选择属性：Me.List18.MultiSelect，值是0，1， 2，但是运行只读属性，只能在运行之前设置。
判断列表项是否被选中属性：Me.List18.Selected(i)， 返回对应序号的列表值是否被选中。
读：＝msgbox（me.text1.value） 赋值：me.Text1.value＝“你好啊”
设置或者访问文本框被选中内容
Me.text3.setfocus Me.Text3.SelStart = 2 Me.Text3.SelLength = 2 MsgBox (Me.Text3.SelText)
22
10.2 模块基础
窗体按钮事件中调用模块过程或函数：
用表达式生成器选择
23
《VBA编程及应用基础》教学课件—05Excel 的VBA对象
RANGE对象的常用属性
Columns
表示指定单元格区域中的所有列 可用 Columns(index) 表示单元格区域中的某列 例如，下面代码将 B2:D4 区域第一列中每一单元格的值置为0：
ThisWorkbook.ActiveSheet.Range("B2:D4").Columns(1).Value = 0
RANGE对象的常用属性
End
表示包含源区域的区域尾端的单元格，语法为：End(Direction)， 其中 Direction 有4个取值：xlDown、xlToRight、xlToLeft、xlUp
例如，下面代码将选定区域从单元格 B4 延伸至第四行最后一个 包含数据的单元格
Worksheets("Sheet1").Activate Range("B4", Range("B4").End(xlToRight)).Select
RANGE对象的常用属性
Offset
表示相对于指定区域偏移若干行和列以后的区域，使用方法： Offset(row, column)，其中 row 和 column 分别为行偏移量和列偏 移量
例： ActiveCell.Offset(3, 3).Value = 5
实践1
在 公务员考试成绩表 工作簿中，假定学生均已获得相应 学位，试编写一个宏，用 For Each…Next 循环遍历“学历” 列各学生的学历，然后在“学位”列填写其对应的学位。 学历学位对应关系如下表所示：
参考”主题
EXCEL 对象模型
在对象模型列表中，以复数形式陈列的表示的是一个集 合。集合是指一组相似的对象，例如 Workbooks 是一个 集合，而 Worksheets 是另一个集合
AccessVBA-入门指导教程PPT课件
-
13
10.4 Access Basic 语句
Access支持结构化语言中的顺序、分支、循环语 句，另外还有一些特殊作用的功能语句。
一、GOTO语句
VBA的GOTO Labal语句可以跳过一些代码块到 Labal的位置，并从该点继续执行。Labal标号要 从代码的最左边（第一列）开始写，这个位置 通常会影响代码的缩进格式。
在代码中使用Dim或Global来声明一个动态数组，
但不确定数组的宽度和维数，在需要使用数组来
存储数据时，使用ReDim来声明数组的宽度和维
数，但这时已经不能更改数组的类型了。使用
ReDim可以为一个动态数组分配内存，多次指定
不同的宽度，但多次定义时，维数必须和第一次
使用ReDim定义的维数一致，不能再次进行修改
Database,Workspace,Document,Container,User, Group,Report,Control,TableDef,QueryDef,Re cordset,Field,Index,Relation,Parameter,Proper ty.
-
6
二、变量定义
在Access中用来定义变量的关键词有：
了。另外，ReDim语句之后还可以使用修补词
“Preserve”将原数组中已经分配的单元保留下来，
这时当第二次使用R分配内存时，只能在最后一
维上变动。例如： -
10
下面的例子是非法操作：
ReDim nNum(5,5,10)
ReDim Preserve nNum(5,7,10) 应该使用下面的代码：
-
16
二、Select语句
当有多种选择时，使用If …Else语句，这样的语句需要多 重嵌套，使得程序十分复杂，不容易读，这时就可以使 用Select语句，Select语句是一个多分支控制语句。语法 格式为：
VBA开发与应用 ppt课件
二、变量和常量 1．常用的变量数据类型
2021/3/26
VBA开发与应用 ppt课件
9
第2章 VBA基础
表4.1 数据类型
数据类型
存储空间
数值范围
Boolean(布尔) 2字节 True或False
Integer(整型) 2字节 -32768～32767
Long(长整型) 4字节 -2147483648～2147483647
加上Static 关键字。
2021/3/26
VBA开发与应用 ppt课件
17
第2章 VBA基础
2.5 过程
三、代码的运行与调试 【方法1】使用“运行”菜单的“运行子过程/用户窗体”命令。 【方法2】单击工具栏的“运行子过程/用户窗体”按钮。 【方法3】用F5快捷键。 如果要中断执行，可用以下几种方法： 【方法1】选择“运行”菜单中的“中断”命令。 【方法2】用Ctrl+Break快捷键。 【方法3】使用工具栏中的“中断”按钮。 【方法4】选择“运行”菜单中的“重设置”项。 【方法5】使用工具栏中的“重新设置”按钮。 要继续执行，可用以下几种方法： 【方法1】在“运行”菜单中选择“继续”项。 【方法2】按F5键。 【方法3】按ALT+F5 键，跳过错误处理程序并继续执行。 【方法4】使用工具栏中的“执行宏”按钮。 【方法5】在“调试”菜单中选择“逐语句”、“逐过程”、“跳出”或“运行到光
Single(单精度) 4字节 负值范围：-3.402823E38 ～ -1.401298E-45 正值范围：1.401298E-45 ～ 3.402823E38
Double(双精度)
8字节
负值范围： -1.79769313486232E308 ～ -4.947E-324 正值范围： 4.947E-324 ～ 1.79769313486232E308
2021/3/26
VBA开发与应用 ppt课件
9
第2章 VBA基础
表4.1 数据类型
数据类型
存储空间
数值范围
Boolean(布尔) 2字节 True或False
Integer(整型) 2字节 -32768～32767
Long(长整型) 4字节 -2147483648～2147483647
加上Static 关键字。
2021/3/26
VBA开发与应用 ppt课件
17
第2章 VBA基础
2.5 过程
三、代码的运行与调试 【方法1】使用“运行”菜单的“运行子过程/用户窗体”命令。 【方法2】单击工具栏的“运行子过程/用户窗体”按钮。 【方法3】用F5快捷键。 如果要中断执行，可用以下几种方法： 【方法1】选择“运行”菜单中的“中断”命令。 【方法2】用Ctrl+Break快捷键。 【方法3】使用工具栏中的“中断”按钮。 【方法4】选择“运行”菜单中的“重设置”项。 【方法5】使用工具栏中的“重新设置”按钮。 要继续执行，可用以下几种方法： 【方法1】在“运行”菜单中选择“继续”项。 【方法2】按F5键。 【方法3】按ALT+F5 键，跳过错误处理程序并继续执行。 【方法4】使用工具栏中的“执行宏”按钮。 【方法5】在“调试”菜单中选择“逐语句”、“逐过程”、“跳出”或“运行到光
Single(单精度) 4字节 负值范围：-3.402823E38 ～ -1.401298E-45 正值范围：1.401298E-45 ～ 3.402823E38
Double(双精度)
8字节
负值范围： -1.79769313486232E308 ～ -4.947E-324 正值范围： 4.947E-324 ～ 1.79769313486232E308
AccessVBA程序设计基础PPT课件
默认为变体类型（Variant）。
第19页/共51页
⑤用户自定义类型的声明与使用
用 户 自 定 义 类 型 可 以 是 任 何 用 Ty p e 语 句 定 义 的 数据类型。用户自定义类型可包含一个或多 个基本数据类型的数据元素、数组或一个先 前定义的用户自定义类型。例如：
Type MyType
intX%=1243
douY#=45665.456
strZ$="Access" 第14页/共51页
② 使用Dim语句声明变量
Dim语句使用格式为： Dim 变量名As 数据类型 例如： Dim strX As String 声明了一个字符串类型变量strX。 可 以 使 用 Dim 语 句 在 一 行 声 明 多 个 变 量 ，
MyName As String*l0 '定义字符串变量存 储一个名字。
MyBirthDate As Date '定义日期变量存储 一个生日。
MySex As Integer '定义整型变量存储性 别
End Type
'（0 为女，1 为男）
第20页/共51页
上 例 定 义 了 一 个 名 称 为 “ M y Ty p e ” 的 数 据 类 型 。 MyType 类 型 的 数 据 具 有 三 个 域 MyName、 MyBirthDate和MySex。
第6页/共51页
下 面 的 例 子 给 出 了 使 用 Const 语 句 来 声 明 数 值 和字符串常量的几种方法。
Const conPI=3.14159265 可以使用conPI来代替常用的π值。 Private Const conPI2=PI*2 conPI2被声明为一个私有常量，同时在计算它
第19页/共51页
⑤用户自定义类型的声明与使用
用 户 自 定 义 类 型 可 以 是 任 何 用 Ty p e 语 句 定 义 的 数据类型。用户自定义类型可包含一个或多 个基本数据类型的数据元素、数组或一个先 前定义的用户自定义类型。例如：
Type MyType
intX%=1243
douY#=45665.456
strZ$="Access" 第14页/共51页
② 使用Dim语句声明变量
Dim语句使用格式为： Dim 变量名As 数据类型 例如： Dim strX As String 声明了一个字符串类型变量strX。 可 以 使 用 Dim 语 句 在 一 行 声 明 多 个 变 量 ，
MyName As String*l0 '定义字符串变量存 储一个名字。
MyBirthDate As Date '定义日期变量存储 一个生日。
MySex As Integer '定义整型变量存储性 别
End Type
'（0 为女，1 为男）
第20页/共51页
上 例 定 义 了 一 个 名 称 为 “ M y Ty p e ” 的 数 据 类 型 。 MyType 类 型 的 数 据 具 有 三 个 域 MyName、 MyBirthDate和MySex。
第6页/共51页
下 面 的 例 子 给 出 了 使 用 Const 语 句 来 声 明 数 值 和字符串常量的几种方法。
Const conPI=3.14159265 可以使用conPI来代替常用的π值。 Private Const conPI2=PI*2 conPI2被声明为一个私有常量，同时在计算它
PPT VBA 学习讲义
PPT学习讲义ActivePresentation.Slides(2).Shapes.Placeholders(1).Delete ActivePresentation.SaveActivePresentation.NewWindow创建ppt文档。
增加一张slideWith Presentations.Add.Slides.Add Index:=1, Layout:=ppLayoutTitle.SaveAs "Sample"End With打开ppt文档。
Presentations.Open FileName:="c:\My Documents\pres1.ppt", _ ReadOnly:=msoTrue创建保存pptSub AddAndSave(pptPres As Presentation)pptPres.Slides.Add 1, 1pptPres.SaveAs pptPres.Application.Path & "\Added Slide"End SubSlide标题删除与恢复ActivePresentation.Slides(2).Shapes.Placeholders(1).Delete Application.ActivePresentation.Slides(2) _.Shapes.AddPlaceholder ppPlaceholderTitle当前演示文稿中添加一张幻灯片，为该幻灯片标题（幻灯片第一个占位符）和副标题添加文本Set myDocument = ActivePresentation.Slides(1)With ActivePresentation.Slides _.Add(1, ppLayoutTitle).Shapes.Placeholders.Item(1).TextFrame.TextRange.Text = "This is the title text".Item(2).TextFrame.TextRange.Text = "This is subtitle text"End With将主题或设计模式应用于当前pptActivePresentation.ApplyTheme若要在幻灯片中添加形状并返回一个代表新建形状的 Shape 对象，请使用 Shapes 集合的下列方法之一：AddCallout 、AddComment 、AddConnector 、AddCurve 、AddLabel 、AddLine 、AddMediaObject 、AddOLEObject 、AddPicture 、AddPlaceholder 、AddPolyline 、AddShape 、AddTable 、AddTextbox 、AddTextEffect 、AddTitle 。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
单击“停止录制”工具栏按钮，结束宏录制过程。
执行宏
当执行一个宏时，EXCEL按照宏语句执行的情况就像VBA代码在对EXCEL进行 “遥控”。但VBA的“遥控”不仅能使操作变得简便，还能使你获得一些使用 EXCEL标准命令所无法实现的功能。而且，一旦熟悉了EXCEL的“遥控”，你都会 奇怪自己在没有这些“遥控”的情况下，到底是怎么熬过来的。要 执行刚才 录制的宏，可以按以下步骤进行：
录制宏后指定快捷键也很简单，只需选择“工具”-“宏”，显示“宏” 对话框，选择要指定快捷键的宏，再单击“选项”按钮，通过“选项” 对话框进行设置。
决定宏保存的位置
宏可保存在三种可能的位置：
1）当前工作簿。（只有该工作簿打开时，该宏才可用。） 2）新工作簿。 3）个人宏工作簿。
个人宏工作簿
“改变颜色”是 宏的名称
注意：有一小圆点，它的作 用在于简化语句，小圆点代 替出现在With后的词,它是
With结构的一部分。
编辑录制的代码
在上一节，我们录制了一个宏并查看了代码，代码中有两句实际上 并不起作用。哪两句？ 现在，在宏中作一个修改，删除多余行，直到和下面代码相同：
Sub 改变颜色() ' ' 改变颜色 Macro ' xw 记录的宏 2000-6-10 '
个人宏工作簿，是为宏而设计的一种特殊的具有自动隐藏特性的工作簿。
第一次将宏创建到个人宏 工作簿时，会创建名为 “PERSONAL.XLS”的 新文件。
个人宏工作簿保存在“XLSTART”文件夹中。 具体路径为： C:\WINDOWS\Profiles\Application Data \Microsoft\Excel\XLSTART。
选择任何一个 单元格，比如A3
选择“工具”―“宏”― “宏”，显示“宏”对话框
选择“改变颜色”， 选择“执行”，则A3单
元格的颜色变为 红色
※ 试着选择其它单元格和几个单元格组成的区域，然后再执行宏，以便加深印象。
查看录制的代码
到底是什么在控制EXCEL的运行呢?你可能有些疑惑. 好,让我们看看VBA的语句吧.
A5单元格变红.
录制宏的局限性
希望自动化的许多EXCEL过程大多都可以用录制宏来完成. 但是宏记录器存在以下局限性.通过宏记录器无法完成的工作有:
录制的宏无判断或循环能力
无法显示EXCEL 对话框
人机交互能力差,即用户无法 进行输入,计算机无法给出提示
无法显示自定义窗体
为宏指定快捷键
你也许希望为经常使用的宏指定快捷键。当给宏指定了快捷键后， 就可以用快捷键来执行宏，而不必通过“工具”菜单。
VBA最最精典的教程(基础入 门)
VBA是什么
直到90年代早期,使应用程序自动化还是充满挑战性的领域.对每个需要自动化的应用 程序,人们不得不学习 一种不同的自动化语言.
例如:可以用EXCEL的宏语言来使EXCEL自动化,使用WORD BASIC使WORD自动化,等等.微 软决定让它开发出来的应用程序共享一种通用的自动化语言-------Visual Basic For Application(VBA),可以认为VBA是非常流行的应用程序开发语言 VASUAL BASIC 的子集.实际上VBA是“寄生于”VB应用程序的版本.VBA和VB的区别包括 如下几个方面: 1. VB是设计用于创建标准的应用程序,而VBA是使已有的应用程序(EXCEL等)自动 化 2. VB具有自己的开发环境,而VBA必须寄生于已有的应用程序. 3. 要运行VB开发的应用程序,用户不必安装VB,因为VB开发出的应用程序是可执行 文件(*.EXE),而VBA开发的程序必须依赖于它的“父”应用程序,例如EXCEL.
※注意：当包含宏的工作簿打开时间， 为宏指定快捷键会覆盖EXCEL默认的快捷键。
可以在创建宏时指定快捷键，也可以在创建后再指定。 要在创建（录制）宏时指定快捷键，只须在录制宏时 在输入宏名后，在“快捷键”文本框中输入相应的键。
例如：把CTRL+C指定 给某个宏，那么CTRL+C 就不再执行复制命令。
' With Selection.Interior .ColorIndex = 3 End With End Sub
完成后，在工作表中试验一下。 你会发现结果和修改前的状况一样。
在With 语句前加入一行: Range(“A5”).Select 试着运行该宏,则无论开始选择 哪个单元格,宏运行结果都是使
尽管存在这些不同,VBA和VB在结构上仍然十分相似.事实上,如果你已经了解了VB,
会发现学习VBA非常快.
VBA究竟是什么?更确切地讲,它是一种自动化语言,它可以使常用的程序自动化,可
以创建自定义的解决方案.
录制简单的宏
在介绍学习VBA之前，应该花几分钟录制一个宏。
新术语：“宏”，指一系列EXCEL能够执行的VBA语句。 以下将要录制的宏非常简单，只是改变单元格颜色。请完成如下步骤：
如果该文件存在，则每当EXCEL 启动时会自动将此文件打开 并隐藏在活动工作簿后面
如果你要让某个宏在多个工作簿 都能使用，那么就应当创建 个人宏工作簿， 并将宏保存于其中。
个人宏工作簿
试着练习一下保存一个简单的宏到个人宏工作簿,该宏为文本加下划线并改 为斜体,步骤如下:
1）建立一个名为“HOUR2”的工作簿，选择“工具”-“宏”-“录制新宏”,显示“录 制新宏”对话框。
Sub 改变颜色() ' ' 改变颜色 Macro ' xw 记录的宏 2000-6-10 '
' With Selection.Interior .ColorIndex = 3 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With End Sub
打开新工作簿，确认其他工作簿已经关闭。 选择A1单元格宏”―“录制新宏”。 输入“改变颜色”作为宏名替换默认宏名，单击确定。
宏名最多可为255 个字符，并且必须以字母
开始。其中可用的字符 包括：字母、数字和 下划线。
选择“格式”的“单元格”，选择“图案”选项中的红色,单击“确定”。