11 VBA什
直90年代早期应程序动化充满挑战性领域需动化应程序学种动化语言例excel宏语言excel动化word BASICword动化等等微软决定开发出应程序享种通动化语言Visual Basic For Application(VBA)认VBA非常流行应程序开发语言VASUAL BASIC子集实际VBA寄生VB应程序版VBAVB区包括方面
1 VB设计创建标准应程序VBA已应程序(excel等)动化
2 VB具开发环境VBA必须寄生已应程序
3 运行VB开发应程序户必安装VBVB开发出应程序执行文件(*EXE)VBA开发程序必须赖父应程序例excel
存VBAVB结构然十分相似事实果已解VB会发现学VBA非常快相应学完VBA会学VB坚实基础学会excel中VBA创建解决方案已具备word access OUTLOOK FOXPRO PROWERPOINT中VBA创建解决方案部分知识
l VBA关键特征学知识微软产品中相互转化
l VBA称作excel遥控器
VBA究竟什更确切讲种动化语言常程序动化创建定义解决方案
外果愿意excel做开发台实现应程序
12 Excel环境中基应程序动化优点
许想知道VBA干什VBA实现功包括
1 重复务动化
2 定义excel工具栏菜单界面
3 简化模板
4 定义excel成开发台
5 创建报表
6 数进行复杂操作分析
excel作开发台原
1 excel身功强包括印文件处理格式化文编辑
2 excel置量函数
3 excel界面熟悉
4 连接种数库
语言开发应程序半工作编写基功模块包括文件开保存印复制等excel作开发台excel已具备基功做
13录制简单宏
介绍学VBA前应该花分钟录制宏
新术语：宏指系列excel够执行VBA语句
录制宏非常简单改变单元格颜色请完成步骤：
1)开新工作簿确认工作簿已关闭
2)选择A1单元格调出常工具栏
3)选择工具—宏—录制新宏
4)输入改变颜色作宏名换默认宏名单击确定注意时状态栏中显示录制特停止录制工具栏显示出换默认宏名便分宏
l 宏名255字符必须字母开始中字符包括：字母数字划线宏名中允许出现空格通常划线代表空格
5)选择格式单元格选择图案选项中红色单击确定
6)单击停止录制工具栏钮结束宏录制程
l 果停止录制工具栏开始未出现请选择工具—宏—停止录制
录制完宏执行
14执行宏
执行宏时excel宏语句执行情况VBA代码excel进行遥控VBA遥控仅操作变简便获excel标准命令法实现功旦熟悉excel遥控会奇怪没遥控情况底熬执行刚录制宏步骤进行：
1）选择单元格A3
2）选择工具—宏—宏显示宏话框
3）选择改变颜色选择执行A3单元格颜色变红色试着选择单元格单元格组成区域然执行宏便加深印象
15查录制代码
底什控制excel运行呢疑惑VBA语句吧
1）选择工具—宏—宏显示宏话框
2）单击列表中改变颜色选择编辑钮
时会开VBA编辑器窗口（VBE）关该编辑器详细说明先注意力集中显示代码代码：（日期姓名会）
Sub改变颜色()
改变颜色Macro
xw记录宏2000610
With SelectionInterior
ColorIndex 3
Pattern xlSolid
PatternColorIndex xlAutomatic
End With
End Sub
会十分熟悉种代码然现种奇怪外语学VBA编程语言某种程度较学种外语
Sub改变颜色()宏名称 中间 开头五行称注释录制宏时动产生 With开头End With结束结构With结构语句段语句宏部分注意单词selection代表突出显示区域（：选定区域）With SelectionInterior ：读作选择区域部整段语句设置该区域部属性
中：
ColorIndex 3 该部设红色注意：圆点作简化语句圆点代出现With词With结构部分外：红色数字化3(红色警戒否称作：3号警戒嗯？)兴趣话3改数字试试
Pattern xlSolid：设置该区域部图案录制宏然未设置项宏然记录(图案选项中项设置已)xlSolid表示纯色
PatternColorIndex xlAutomatic：表示部图案底纹颜色动配色
End With结束With语句
End Sub整宏结束语
16编辑录制代码
节录制宏查代码代码中两句实际起作两句？现宏中作修改删余行直面代码相：
Sub改变颜色()
改变颜色Macro
xw记录宏2000610
With SelectionInterior
ColorIndex 3
End With
End Sub
完成工作表中试验会发现结果修改前状况样With语句前加入行
Range(A5)Select
试着运行该宏开始选择单元格宏运行结果A5单元格变红
现编辑录制宏样非常简单需编辑宏三方面原：录制中出错修改二：录制宏中余语句需删提高宏运行速度三：希增加宏功：加入判断循环等法录制语句
17录制宏局限性
希动化许excel程录制宏完成宏记录器存局限性通宏记录器法完成工作
1)录制宏判断循环力
2)机交互力差户法进行输入计算机法出提示
3)法显示excel话框
4)法显示定义窗体
18结
学时中已掌握VBA基础知识会录制宏编辑宏解录制宏局限性努力已学VBA甚VB等编程语言基础关键已解谜底说解什编程面练做完玩哟
思考
1)VBAexcel
2)VBA基种语言
3)说说excelVBA关系
4)什宏
原文发表时间：未知
<[dvnews_page(2)处理录制宏]
21宏指定快捷键
许希常宏指定快捷键快捷键指键组合时执行条命令例：CTRL+C
许程序中代表复制命令宏指定快捷键快捷键执行宏必通工具菜单
注意：包含宏工作簿开时间宏指定快捷键会覆盖excel默认快捷键例：CTRL+C指定某宏CTRL+C执行复制命令方法印出excel快捷键清单（A4纸印24页）：
1）开excel帮助文件选择目录选项
2）快捷键文件夹中选择快捷键标题
3）右击该标题快捷菜单中选择印
4）选择印选标题子题单击确定
创建宏时指定快捷键创建指定创建（录制）宏时指定快捷键须录制宏时输入宏名快捷键文框中输入相应键录制宏指定快捷键简单需选择工具宏显示宏话框选择指定快捷键宏单击选项钮通选项话框进行设置
22决定宏保存位置
宏保存三种位置：
1）前工作簿（该工作簿开时该宏） 2）新工作簿 3）宏工作簿
23宏工作簿
宏工作簿宏设计种特殊具动隐藏特性工作簿第次宏创建宏工作簿时会创建名PERSONALXLS新文件果该文件存excel启动时会动文件开隐藏活动工作簿面（窗口菜单中选择取消隐藏方便发现存）果某宏工作簿应创建宏工作簿宏保存中宏工作簿保存XLSTART文件夹中具体路径：C＼WINDOWS＼Profiles＼Application Data＼Microsoft＼excel＼XLSTART单词XLSTART查询
注意：果存宏工作簿excel启动时会动文件开隐藏存放XLSTART文件夹
231保存宏宏工作簿
练保存简单宏宏工作簿该宏文加划线改斜体步骤
1)建立名HOUR2工作簿选择工具宏录制新宏显示录制新宏话框
2)输入格式化文作宏名
3)保存拉框中选择宏工作簿
4)单击确定钮现进入录制模式
5)单击斜体工具栏钮段时间鼠标出现沙漏特第次创建宏工作簿时excel创建该工作簿
6)单击划线钮
7)停止录制
232编辑宏工作簿中宏
刚已保存宏宏工作簿现工作簿中该宏步骤操作
1)关闭excel工作簿
2)意开excel文件(excel动宏工作簿时开隐藏)
3) A3中输入名字
4)选择工具宏显示宏话框现宏列表中格式化文宏
5)选择格式化文宏执行现A3单元格中名字变斜体字带划线选择窗口取消隐藏PERSONALXLS显示出中没文字通VBA编辑器中模块中找格式化文宏VBA编辑器中该宏进行直接编辑者删果PERSONALXLS中宏没启动excel时会开PERSONALXLS许excel存毛病
24宏指定钮
通快捷键宏执行变快旦宏数量难记忆果宏难道记住快捷键
作excel开发者目标动化提供易操作界面钮常见界面组成元素通窗体工具栏工作簿中工作表添加钮创建完钮指定宏然户通单击钮执行宏练中创建钮指定宏然该钮执行宏具体步骤：
1）开HOUR2工作簿
2）调出窗体工具栏
3）单击窗体工具栏中钮控件时鼠标变成十字形状
4）希放置钮位置鼠标左键拖动鼠标画出矩形矩形代表该钮满意放开鼠标左键样命令钮添加工作表中时excel动显示指定宏话框
5）指定宏话框中选择格式化文单击确定样该宏指定命令钮
6）钮标题钮1前单击鼠标左键DELETE直删文输入格式化作标题
7）单击钮外意位置现该钮标题默认钮1变格式化指定宏
8）试着某单元格中输入文单击钮运行该宏
鼠标移动该钮时动变成手形状果改变标题需右键单击该钮进行修改设置明显需记住宏名字快捷键需钮
25宏指定图片象
执行宏种方法选择宏指定钮等控件指定图片定义工具栏窗体甚宏指定某事件单击工作表双击工作表激活工作表开工作簿等等事件重概念外方法象会常接触现十分抽象会熟悉词语指定宏图片十分简单需单击某图片单击快捷菜单中指定宏进行设置
果希工作表添加控件图片执行宏种方法选择：宏指定工具栏钮步骤进行：
1）开HOUR2工作簿选择工具定义显示定义工具栏话框
2）类列表框中选择宏命令列表框中选择定义钮
3）定义钮拖动工具栏
4）右键单击该钮选择指定宏显示指定宏话框
5）选择格式化文确定
6）单击关闭钮关闭定义工具栏话框
7）试着某单元格中输入文单击工具栏钮运行该宏
结思考： 宏存放三位置宏工作簿存放位置特性执行宏方式指定宏某象事件指定程序旦象该事件激活系统运行指定程序
常象：workbookworksheetrangecells图表图片数透视表控件窗体工具栏象响应特殊事件（通事件单击双击等）兴趣通excel帮助文件查询词条excel中属某象excel中做许工作移动鼠标等等触发事件学时学控件
<[dvnews_page(3)学控件]
31 excel开发程简介
需问题致概念
1)谁决定程序操作难度界面感观
2)数源保存里决定程序结构
3)操作决定程序界面细节
4)数处理结果终决定程序价值
32认识控件
开始时请关闭工作簿开新工作簿存HOUR3工具栏单击鼠标右键快捷菜单中选择窗体显示窗体工具栏中16控件9放工作表
1）标签：表现静态文
2）分组框：控件进行组合
3）钮：执行宏命令
4）复选框：选择控件通单击选择取消选择项选择
5）选项钮：通常选项钮组合起组中选择选项钮
6）列表框：显示选项中选择单选
7）组合框：显示选项中选择选择中项目者输入值
8）滚动条：常见长窗体添加滚动力控件种选择机制例调节渡色滚动条控件包括水滚动条垂直滚动条
9）微调控件：种数值选择机制通单击控件箭头选择数值例改变Windows日期时间会微调控件
33工作表添加控件
excel设计界面十分简单控件添加工作表步骤操作
1)创建新工作簿存HOUR3显示窗体工具栏
2)选择标签控件
3)鼠标定位E1时鼠标变成十字
4)左键拖动约四单元格长度放开鼠标左键果希控件易控制创建该控件时ALT拖动
5)标签1单击右键选择编辑文字现输入文字完成单击单元格退出文字编辑
6)通步骤添加控件工作表中赘述
34设置控件特性
设置控件特性步骤操作
1)选中先前创建复选框控件果没马创建
2)右击该控件选择控制选项卡
3)单元格链接中输入A1确定
4)单击意单元格退出设置
5)鼠标左键单击复选框A1出现TRUE意味着该控件选中次单击该控件A1出现FALSE
6)选择刚创建滚动条控件调出设置控件格式话框
7)单元格链接中输入A3确定
8)滚动条外意单元格单击鼠标左键滚动条选择
9)鼠标单击滚动条箭头A1数值增加1继续单击A1数值继续增加
10)保存关闭该工作簿
35控件命名
创建控件时excel会动指定名字便理解记忆控件取名方法基单元格区域取名方法相选中某控件位公式栏名字编辑框输入控件名字样控件更改名字
36户窗体
果希创建专业级应程序方便户输入数应该户窗体户窗体作程序话框窗口户窗体添加控件基类似工作表添加控件然第步创建户窗体通VBA编辑器实现具体步骤操作
1)开HOUR3工作簿选择工具宏VBA编辑器开VBA编辑器
2)VBA编辑器中选择工具栏插入户窗体钮者选择插入菜单拉菜单中选择户窗体
现VBA编辑器中出现名USERFORM1窗体控件工具箱时出现中许已熟悉控件外新控件
新控件
A)切换钮该控件果选中会保持状态果次单击恢复没状态excel工具栏中样钮例全屏显示加粗划线窗体工具栏中切换网格等
B)选项卡条(TabStrip)包含选项卡控件通常相关信息进行组织分类例许希选项卡条显示区销售信息区设置选项卡默认时选项卡包含两页分做TAB1TAB2添加更选项卡
C)页外观类似选项卡条包含页页控件选项卡条相似外观页控件页包含控件布局页例子例设置控件格式话框工具菜单中选项话框格式菜单中单元格话框
D)图控件允许窗体放置图片图片格式须 *bmp*cur*gif*ico*jpg*wmf
F)RefEdit工具箱中默认情况控件外观象文框通控件户窗体折叠起便选择单元格区域记fx粘贴函数时情况？
通实践会逐渐掌握控件特性确需花时间必死记硬背
户窗体设计满意时进行预览方法VBA编辑器中选择该窗体单击运行菜单中三角符号运行子程户窗体三角符号VBA工具栏旁边垂直等符号右边正方形符号类似录音机钮运行窗体方法F5键
结：学完学时具备程序界面设计基知识控件感陌生明白工作表窗体添加控件控件容需边边理解界面转移学编写代码终二者融合准备学编程吧
疑难解答
问题1样决定控件位置选择添加工作表添加户窗体
解答完全取决爱应程序户果户excel非常熟悉许更希工作表方式操作种情况妨直接工作表创建控件果户excel熟悉者需户专业界面感觉应该户窗体
问题2什情况该选项卡条页控件 解答果页具相布局应选择选项卡条否应该选择页
节作业：
1思考：
1）列举两种户进行选控件
2）控件单元格链接起
2判断
1）VBA编辑器中添加户窗体
2）VBA编辑器中窗体网格线运行时会动显示
3填空( )显示静态文控件
<[dvnews_page(4)理解变量]
44变量
变量时保存数值方次应程序运行时变量包含数值程序运行时变量数值改变
说明什需变量步骤创建简单程
1)创建名什名字程
2)程中输入代码
Inputbox 输入名字
现担心inputbox语句语法第六学时中解关条命令更信息
3)F5键运行程时会显示输入框求输入名字
4)输入名字确定钮结束该程
输入名字里找户输入框中输入信息种情况需变量存储户输入结果
441变量数类型
变量第步解变量数类型变量数类型控制变量允许保存种类型数表41列出VBA支持数类型列出种类型变量需存储空间够存储数值范围
表41 VBA数类型
作ABV程序员目标选择需存储空间量数类型保存需数正表41提供种数类型存储空间原例保存诸班级学生总数样数字Byte数类型足够种情况Single数类型计算机存储空间浪费
442Dim语句创建变量(声明变量)
现变量数类型已较熟悉创建变量创建变量Dim语句创建变量通常成声明变量 Dim语句基语法
Dim变量名AS数类型
条语法中变量名代表创建变量名变量命名规程命名规相条语句中数类型部分表41中种数类型
变量名必须字母开始包含字母数字特定特殊字符包含空格句号惊叹号包含字符@ & #名字长度255字符
接练中说明VBA中变量输入名字消息框显示出具体步骤
1)创建名显示名字子程序
2)输入代码
Public Sub显示名字()
Dim s名字As String
s名字 Inputbox(请输入名字)
Msgbox & s名字
End Sub
3)鼠标放程中方F5键运行程会显示输入框
4)输入名字回车键会显示消息框显示文字中包含名字
5)单击确定钮返回程中
Dim语句中必提供数类型果没数类型变量定义Variant类型VBA中默认数类型Variant知道点初反应许觉应该决定数类型切抛VBA种观念完全错误必须决定选择种数类型Variant数类型占存储空间较（1622字节）影响程序性VBA必须辨Variant类型变量中存储种类型数
443变量命名惯例
表出推荐变量命名惯例
表42变量命名前缀
444数组
果编程序语言数组已较熟悉数组具相数类型享名字组变量集合数组中元素通索引数字加区分定义数组方法
Dim array_name(n) As type (中n数组元素数)
例果创建保存10学生名字数组语句
Dim s学生名字(9) As Integer
注意括号中数字910默认情况第索引数字0数组处理相似信息时非常假设处理15门考试成绩创建15独立变量意味着15Dim语句创建数组保存考试成绩具体：
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)
445变量赋值
声明变量变量赋值请注意列语句中数组变量赋值时索引数字
程序清单44
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(输入考试成绩& i )
Next i
45常量
现已知道变量存储非静态信息存储容器存储静态信息时创建常量供程序次便记忆圆周率31415926理解
声明常量设置常量值需const语句常量声明赋新值例假设需声明常量保存销项税率语句
const S销项税率As Long 017
通常常量声明时全写字母区分变量
46作域
现止已学定义变量常量知道处定义两方定义常量变量
程中定义模块顶部名通声明区域定义定义位置决定作域
程中声明该变量该程中程中变量常量中变量成局部变量程级变量模块顶部声明变量称模块级变量该变量该模块程中
种等级作域称公级公级变量应程序程中程变量否定义模块公级变量中十分灵活公级变量程序运行时直保留存中样占系统资源创建公级变量Public语句具体语法：
Public variablename As datatype
创建公级常量具体语法：
Public const CONSTANAME datatype value
公级变量常量必须模块顶部通声明区域中定义
47结
课重点变量常量课中学会创建变量保存非静态数解VBA数类型学会创建常量保存静态数课部分学变量常量作域
48疑难解答
1果希位置变量数应该处定义该变量？
答：必须模块顶部通声明区域定义模块级变量Dim语句公级变量Public语句
2模块否独立工作簿
答实际模块工作簿部分保存工作簿时模块做改变时保存
3什应该变量定义Variant数类型 答Variant类型数占较存影响应程序性
<[dvnews_page(5)利VBA设置工作表权限]
般保护工作表采取方法excel菜单中保护命令时尚嫌足机密文件根某者法需操作工作簿中表办？
开VBA编辑器开工程资源理器双击该工作表现出现设置该表属性编辑窗口单击窗口左拉列表框选择worksheet 时该窗口右方列表框中选择Active(激活)时动显示语句块：
Private Sub Worksheet_Activate()
End Sub
中加入代码：(假设123作密码Sheet机密文档限制权限文档sheet普通文档工作簿中认适合工作表)
If ApplicationInputBox(请输入操作权限密码) 123 Then
Range(A1)Select
Else
Msgbox 密码错误退出
Sheets(普通文档)Select
End if
程序：
Private Sub Worksheet_Activate()
If ApplicationInputBox(请输入操作权限密码) 123 Then
Range(A1)Select
Else
MsgBox 密码错误退出
Sheets(普通文档)Select
End If
End Sub
样做问题越权者会文件片段提示密码段时间样做述方法选择工作表Deactivate事件输入代码：
Sheets(机密文档)CellsFontColorIndex 2
段程序工作表激活时文字白色然第程序中Range(A1)Select插入行写入代码：
ActiveSheetCellsFontColorIndex 56
段程序输入正确密码该表文字转变深灰色 完整程序：
Private Sub Worksheet_Activate()
If ApplicationInputBox(请输入操作权限密码) 123 Then
Range(A1)Select
Sheets(机密文档)CellsFontColorIndex 56
Else
MsgBox 密码错误退出
Sheets(普通文档)Select
End If
<[dvnews_page(6)提高excel中VBA效率]
Microsoft office办公套件广泛应该软件版断提升功断完善office办公套件台开发出VBA应程序越越VBA种宏语言运行速度限制VBA编程方法直接关系VBA程序运行效率文列举提高VBA程序运行效率方法
方法1：量VBA原属性方法Worksheet函数
excel象达百象属性方法事件胜数初学者说全部解产生编程者常编写excel象属性方法相功VBA代码段代码段运行效率显然excel象属性方法完成务速度相差甚例Range属性CurrentRegion返回Range象该象代表前区（前区指意空白行空白列组合边界区域）样功VBA代码需数十行编程前应解excel象属性方法
充分利Worksheet函数提高程序运行速度极度效方法求均工资例子：
For Each c In
Worksheet(1)Range(″A1A1000″)
TotalValue TotalValue ＋ cValue
Next
AverageValue TotalValue Worksheet(1)Range(″A1A1000″)RowsCount
面代码程序面例子快：
AverageValueApplicationWorksheetFunctionAverage(Worksheets(1)Range(″A1A1000″))
函数CountCountaCountifMatchLookup等等代相功VBA程序代码提高程序运行速度
方法2：量减少象引尤循环中
excel象属性方法调需通OLE接口调OLE调需时间减少象引加快VBA代码运行例
1．With语句
Workbooks(1)Sheets(1)Range(″A1A1000″)FontName″Pay″
Workbooks(1)Sheets(1)Range(″A1A1000″)FontFontStyle″Bold″
语句面快
With Workbooks(1)Sheets(1)Range(″A1A1000″)Font
Name ″Pay″
FontStyle ″Bold″
End With
2．象变量
果发现象引次象Set设置象变量减少象访问：
Workbooks(1)Sheets(1)Range(″A1″)Value 100
Workbooks(1)Sheets(1)Range(″A2″)Value 200
代码面快：
Set MySheet Workbooks(1)Sheets(1)
MySheetRange(″A1″)Value 100
MySheetRange(″A2″)Value 200
3．循环中量减少象访问
For k 1 To 1000
Sheets(″Sheet1″)Select
Cells(k1)Value Cells(11)Value
Next k
代码面快：
Set TheValue Cells(11)Value
Sheets(″Sheet1″)Select
For k 1 To 1000
Cells(k1)Value TheValue
Next k
方法3：减少象激活选择
果通录制宏学VBAVBA程序里定充满象激活选择例Workbooks(XXX)ActivateSheets(XXX)SelectRange(XXX)Select等事实数情况操作必需例
Sheets(″Sheet3″)Select
Range(″A1″)Value 100
Range(″A2″)Value 200
改：
With Sheets(″Sheet3″)
Range(″A1″)Value 100
Range(″A2″)Value 200
End With
方法4：关闭屏幕更新
果VBA程序前面三条做较差关闭屏幕更新提高VBA程序运行速度效方法缩短运行时间23左右关闭屏幕更新方法：
ApplicationScreenUpdate False
请忘记VBA程序运行结束时该值设回：
ApplicationScreenUpdate True
提高VBA运行效率较效种方法
<[dvnews_page(7)excel里定时器]
excel里加载宏 定时保存 ？惜源程序加密现传篇介绍实现文档
office里方法applicationontime 具体函数：
expressionOnTime(EarliestTime Procedure LatestTime Schedule)
果想进步解请参阅excel帮助
函数安排程特定时间运行（某日期指定时间指定时间段）通函数excel里编写定时程序面举两例子说明
1午170000时候显示话框
Sub Run_it()
ApplicationOnTime TimeValue(170000) Show_my_msg
设置定时器170000激活激活运行Show_my_msg
End Sub
Sub Show_my_msg()
msg MsgBox(现170000 vbInformation 定义信息)
End Sub
2模仿excel 97里 动保存宏里定时5秒出现次 Sub auto_open()
MsgBox 欢迎篇文档里5秒出现次保存提示 vbInformation 请注意
Call runtimer 开文档时动运行
End Sub
Sub runtimer()
ApplicationOnTime Now + TimeValue(000005) saveit
Now + TimeValue(001500) 指定前时间5秒钟开始运行Saveit程
End Sub
Sub SaveIt()
msg MsgBox(朋友已工作久现存盘？ & Chr(13) _
& 选择：立刻存盘 & Chr(13) _
& 选择否：暂存盘 & Chr(13) _
& 选择取消：出现提示 vbYesNoCancel + 64 休息会吧)
提示户保存前活动文档
If msg vbYes Then ActiveWorkbookSave Else If msg vbCancel Then Exit Sub
Call runtimer 果户没选择取消次调Runtimer
End Sub
两简单例子兴趣话利ApplicationOntime函数写出更更定时程序
— END —
文档香网(httpswwwxiangdangnet)户传
《香当网》用户分享的内容，不代表《香当网》观点或立场，请自行判断内容的真实性和可靠性！
该内容是文档的文本内容，更好的格式请下载文档