Sub




    
 addFile()
    Dim resFolderChild, nowTime, afterPath
    '获取系统当前时间并格式化，nowTime 就是自己想要的文件夹的名字，长这样：20191121173628
    nowTime = Format(Now, "yyyy" & "mm" & "dd" & "hh" & "mm" & "ss")
    'afterPath 是新建文件夹的路径，如果文件夹创建成功，那么它的路径就是afterPath
    afterPath = "D:\changeAfter_Files\" & nowTime
    '判断当前路径下是否已存在名为nowTime的文件夹(也就是直接判断新建文件夹的路径是否可以查找到，如果没有查找到，就说明在这个目录下，名为nowTime的文件夹不存在，那么就可以新建文件夹了)
    resFolderChild = Dir(afterPath, vbDirectory)
    If resFolderChild = "" Then
        MkDir (afterPath)
    End If
End Sub
                    VBA以当前系统时间（年、月、日、时、分、秒）命名文件夹Sub addFile()    Dim resFolderChild, nowTime, afterPath    '获取系统当前时间并格式化，nowTime 就是自己想要的文件夹的名字，长这样：20191121173628    nowTime = Format(Now, "yyyy" & "mm" & "dd" ...
一、VBA语言基础...................................................................................................................1
第一节标识符....................................................................................................................................1
第二节运算符....................................................................................................................................1
第三节数据类型................................................................................................................................1
第四节变量与常量............................................................................................................................1
第五节数组........................................................................................................................................2
第六节注释和赋值语句....................................................................................................................2
第七节书写规范................................................................................................................................2
第八节判断语句................................................................................................................................2
第九节循环语句................................................................................................................................3
第十节其他类语句和错误语句处理................................................................................................4
第十一节过程和函数........................................................................................................................4
一．Sub过程.................................................................4
二．Function函数............................................................5
三．Property属性过程和Event事件过程.........................................5
第十二节内部函数.............................................................................................................................5
一．测试函数................................................................5
二．数学函数................................................................5
三．字符串函数..............................................................5
四．转换函数................................................................6
五．时间函数................................................................6
第十三节文件操作............................................................................................................................6
文件........................................................................6
删除........................................................................6
打开........................................................................6
读入........................................................................7
写入........................................................................7
关闭........................................................................7
其他文件函数................................................................7
二、VISUALBASIC程序设计网络教学.....................................................................................1
第一课VBA是什么.................................................................................................................1
1.1VBA是什么....................................................................................................................................1
1.2EXCEL环境中基于应用程序自动化的优点................................................................................1
1.3录制简单的宏..............................................................................................................................1
1.4执行宏..........................................................................................................................................2
1.5查看录制的代码..........................................................................................................................2
1.6编辑录制的代码..........................................................................................................................3
1.7录制宏的局限性..........................................................................................................................
31.8小结..............................................................................................................................................3
第二课处理录制的宏............................................................................................................3
2.1为宏指定快捷键..........................................................................................................................3
2.2决定宏保存的位置......................................................................................................................4
2.3个人宏工作簿..............................................................................................................................4
2.3.1保存宏到个人宏工作簿..................................................4
2.3.2使用并编辑个人宏工作簿中的宏..........................................4
2.4将宏指定给按钮..........................................................................................................................4
2.5将宏指定给图片或其他对象......................................................................................................5
2.6小结..............................................................................................................................................5
第三课学习控件...................................................................................................................5
-----------------------页面2-----------------------
3.1EXCEL开发过程简介....................................................................................................................5
3.2认识不同的控件..........................................................................................................................5
3.3向工作表添加控件......................................................................................................................6
3.4设置控件的特性..........................................................................................................................6
3.5给控件命名..................................................................................................................................6
3.6使用用户窗体..............................................................................................................................6
3.7疑难解答......................................................................................................................................7
第四课理解变量和变量的作用..............................................................................................7
4.1代码存在的位置：模块..............................................................................................................7
4.2对模块的概览..............................................................................................................................7
4.2.1创建过程..............................................................8
4.2.2运行宏................................................................9
4.3保存对模块所做的改变..............................................................................................................9
4.4变量..............................................................................................................................................9
4.4.1变量的数据类型........................................................9
4.4.2用Dim语句创建变量(声明变量)..........................................10
4.4.3变量命名的惯例.......................................................10
4.4.4使用数组.............................................................10
4.4.5变量赋值.............................................................11
第五课利用VBA设置工作表使用权限...................................................................................11
1．使用WITH语句。..........................................................................................
2．使用对象变量。.........................................................................................
方法3：减少对象的激活和选择....................................................................
方法4：关闭屏幕更新....................................................................................
第六课提高EXCEL中VBA的效率............................................................................................12
方法1：尽量使用VBA原有的属性、方法和WORKSHEET函数............................................................12
方法2：尽量减少使用对象引用，尤其在循环中.........................................................................12
1．使用With语句。..........................................................12
2．使用对象变量。..........................................................12
3．在循环中要尽量减少对象的访问。..........................................13
方法3：减少对象的激活和选择....................................................................................................13
方法4：关闭屏幕更新....................................................................................................................13
第七课如何在EXCEL里使用定时器.......................................................................................13
三、学习微软EXCEL2002VBA编程和XML，ASP技术...........................................................15
第一章电子表格自动化简介和了解宏命令...........................................................................15
1了解宏............................................................................................................................................15
2宏命令的普通应用........................................................................................................................15
3写宏之前的计划............................................................................................................................16
4录制宏............................................................................................................................................17
5运行宏............................................................................................................................................18
6修改宏代码....................................................................................................................................19
7添加注释........................................................................................................................................21
8分析宏代码....................................................................................................................................22
9清除宏代码....................................................................................................................................23
10测试修改好的宏..........................................................................................................................24
11两个层面运行宏的方法..............................................................................................................24
12完善你的宏代码..........................................................................................................................25
13重新命名宏..................................................................................................................................27
14运行宏的其它方法......................................................................................................................27
-----------------------页面3-----------------------
15使用键盘快捷键运行宏..............................................................................................................27
16通过菜单运行宏..........................................................................................................................28
17通过工具栏按钮运行宏..............................................................................................................30
18通过工作表里面的按钮运行宏..................................................................................................31
19保存宏..........................................................................................................................................32
20打印宏..........................................................................................................................................32
21保存宏在个人宏工作簿..............................................................................................................32
22打开含有宏的工作簿..................................................................................................................34
23VB编辑窗口...................................................................................................................................35
24了解工程浏览窗口......................................................................................................................35
25了解属性窗口..............................................................................................................................36
26了解代码窗口..............................................................................................................................36
27VB编辑器里的其它窗口..............................................................................................................38
28接下来……..................................................................................................................................39
第二章VBA第一步..............................................................................................................39
1了解指令，模块和过程................................................................................................................39
2VBA工程命名..................................................................................................................................39
3模块重命名....................................................................................................................................40
4从其它工程调用过程....................................................................................................................41
5了解对象，属性和方法................................................................................................................42
6学习对象，属性和方法................................................................................................................43
7句法和文法....................................................................................................................................45
8打断很长的VBA语句......................................................................................................................47
9了解VBA错误..................................................................................................................................47
10查找帮助......................................................................................................................................49
11语法和编程快捷助手..................................................................................................................50
12属性/方法列表............................................................................................................................51
13常数列表......................................................................................................................................51
14参数信息......................................................................................................................................52
15快速信息......................................................................................................................................52
16自动完成关键字..........................................................................................................................52
17缩进/凸出....................................................................................................................................53
18设置注释块/解除注释块............................................................................................................53
19使用对象浏览器..........................................................................................................................53
20使用VBA对象库............................................................................................................................58
21用对象浏览器来定位过程..........................................................................................................59
22使用立即窗口..............................................................................................................................59
23获取立即窗口里的信息..............................................................................................................61
24学习对象......................................................................................................................................62
25电子表格单元格操作..................................................................................................................62
26使用RANGE属性..............................................................................................................................62
27使用CELLS属性..............................................................................................................................62
28使用OFFSET属性............................................................................................................................63
29选择单元格的其它方法..............................................................................................................64
30选择行和列..................................................................................................................................64
31获取工作表信息..........................................................................................................................65
32往工作表输入数据......................................................................................................................65
33返回工作表中的信息..................................................................................................................65
34单元格格式..................................................................................................................................66
35移动，复制和删除单元格..........................................................................................................66
36操作工作簿和工作表..................................................................................................................67
37操作窗口（WINDOWS）...................................................................................................................67
38管理EXCEL应用程序......................................................................................................................68
-----------------------页面4-----------------------
39接下来……..................................................................................................................................68
第三章了解变量，数据类型和常量.....................................................................................69
1保存VBA语句的结果......................................................................................................................69
2变量是什么....................................................................................................................................69
3数据类型........................................................................................................................................69
4如何产生变量................................................................................................................................70
5如何声明变量................................................................................................................................71
6明确变量的数据类型....................................................................................................................72
7变量赋值........................................................................................................................................73
8强制声明变量................................................................................................................................75
9了解变量范围................................................................................................................................76
10过程级别（当地）变量..............................................................................................................76
11模块级别变量..............................................................................................................................77
12工程级别变量..............................................................................................................................77
13变量的存活期..............................................................................................................................78
14了解和使用静态变量..................................................................................................................78
15声明和使用对象变量..................................................................................................................79
16使用明确的对象变量..................................................................................................................80
17查找变量定义..............................................................................................................................80
18在VB过程里面使用常量..............................................................................................................80
19内置常量......................................................................................................................................81
20接下来……..................................................................................................................................82
第四章VBA过程：子程序和函数..........................................................................................82
1.关于函数过程...............................................................................................................................82
2.创建函数过程...............................................................................................................................82
3.执行函数过程...............................................................................................................................84
4.从工作表里运行函数过程...........................................................................................................84
5.从另外一个VBA过程里运行函数过程.........................................................................................85
6.传递参数.......................................................................................................................................86
7.明确参数类型...............................................................................................................................87
8.按地址和按值传递参数...............................................................................................................88
9.使用可选的参数...........................................................................................................................88
10.定位内置函数.............................................................................................................................89
11.使用MSGBOX函数...........................................................................................................................90
12.MSGBOX函数的运行值...................................................................................................................94
13.使用INPUTBOX函数........................................................................................................................95
14.数据类型转变.............................................................................................................................96
15.使用INPUTBOX方法........................................................................................................................97
16.使用主过程和子过程...............................................................................................................100
17.接下来……...............................................................................................................................102
第五章基于VBA做决定......................................................................................................102
1.关系和逻辑运算符.....................................................................................................................102
2.IF…THEN语句...............................................................................................................................103
3.基于多于一个条件的决定.........................................................................................................105
4.THEIF…THEN…ELSE语句.............................................................................................................106
5.IF…THEN…ELSEIF语句................................................................................................................108
6.嵌套的IF…THEN语句...................................................................................................................110
7.SELECTCASE语句...........................................................................................................................110
8.和CASE子句一起使用IS...............................................................................................................112
9.确定CASE子句里数值的范围......................................................................................................113
10.在CASE子句里确定多个表达式.................................................................................................114
-----------------------页面5-----------------------
11.接下来…...................................................................................................................................114
第六章在VBA中重复操作...................................................................................................114
1.DOLOOPS:DO…WHILE和DO…UNTIL................................................................................................114
2.观察过程执行.............................................................................................................................117
3.WHILE…WEND循环..........................................................................................................................118
4.FOR…NEXT循环...........................................................................................................................119
5.FOREACH…NEXT循环.....................................................................................................................120
7.提前跳出循环.............................................................................................................................121
8.循环嵌套.....................................................................................................................................122
9.接下来….....................................................................................................................................122
第七章利用VBA数组管理数据清单和表格..........................................................................122
1.了解数组.....................................................................................................................................123
2.声明数组.....................................................................................................................................124
3.数组的上界和下界.....................................................................................................................124
4.在VBA过程里使用数组...............................................................................................................124
5.数组和循环语句.........................................................................................................................125
6.使用二维数组.............................................................................................................................127
7.静态和动态数组.........................................................................................................................128
8.数组函数.....................................................................................................................................129
9.ARRAY函数.....................................................................................................................................130
10.ISARRAY函数...............................................................................................................................130
11.ERASE函数...................................................................................................................................131
12.LBOUND函数和UBOUND函数..........................................................................................................131
13.数组中的错误...........................................................................................................................132
14.数组作为参数...........................................................................................................................134
15.接下来…...................................................................................................................................134
第八章利用VBA操纵文件和文件夹.....................................................................................134
1.获取当前文件夹的名称（CURDIR函数）...................................................................................135
2.更改文件或文件夹名称（NAME函数）.......................................................................................135
3.检查文件或文件夹是否存在（DIR函数）................................................................................136
4.获得文件修改的日期和时间（FILEDATETIME函数）.................................................................137
5.获得文件大小（FILELEN函数）.................................................................................................138
6.返回和设置文件属性（GETATTR函数和SETATTR函数）.............................................................138
7.更改缺省文件夹或驱动器（CHDIR语句和CHDRIVE语句）.........................................................139
8.创建和删除文件夹（MKDIR语句和RMDIR语句）........................................................................140
9.复制文件（FILECOPY语句）........................................................................................................140
10.删除文件（KILL语句）............................................................................................................142
11.从文件读取和写入数据（INPUT/OUTPUT）...............................................................................142
12.文件访问类型...........................................................................................................................142
13.使用顺序文件...........................................................................................................................143
14.读取储存于顺序文件里的数据...............................................................................................143
15.逐行读取文件...........................................................................................................................143
16.从顺序文件中读取字符...........................................................................................................144
17.读取分隔文本文件...................................................................................................................145
18.往顺序文件里写数据...............................................................................................................146
19.使用WRITE#和PRINT#语句....................................................................................................147
20.操作随机文件...........................................................................................................................148
21.创建用户定义的数据类型.......................................................................................................148
22.操作二进制文件.......................................................................................................................152
23.操作文件和文件夹的时髦方法...............................................................................................153
24.使用WSH获取文件信息.............................................................................................................155
-----------------------页面6-----------------------
25.FILESYSTEMOBJEC的方法和属性..................................................................................................156
26.对象FILE的属性........................................................................................................................160
27.文件夹对象属性.......................................................................................................................161
28.驱动器对象属性.......................................................................................................................161
29.使用WSH创建文本文件.............................................................................................................162
30.使用WSH进行其它操作.............................................................................................................164
31.运行其它应用程序...................................................................................................................164
32.创建快捷方式...........................................................................................................................165
33.接下来……...............................................................................................................................166
第九章利用VBA控制其它应用程序.....................................................................................167
1.启动应用程序.............................................................................................................................167
2.在应用程序之间切换.................................................................................................................169
3.控制其它应用程序.....................................................................................................................170
4.控制应用程序的其它方法.........................................................................................................171
5.了解自动控制.............................................................................................................................172
6.了解链接和嵌入.........................................................................................................................172
7.使用VBA进行链接和嵌入...........................................................................................................173
8.COM和自动控制...........................................................................................................................174
9.了解绑定.....................................................................................................................................174
10.后期绑定...................................................................................................................................174
11.早期绑定...................................................................................................................................174
12.建立到对象库的引用...............................................................................................................175
13.创建自动控制对象...................................................................................................................176
14.使用CREATEOBJECT函数...............................................................................................................176
15.使用自动控制创建一个新的WORD文档.....................................................................................177
16.使用GETOBJECT函数....................................................................................................................177
17.打开存在的WORD文档................................................................................................................178
18.使用关键字NEW..........................................................................................................................179
19.使用自动控制访问MICROSOFTOUTLOOK.......................................................................................180
20.接下来……...............................................................................................................................181
第十章对话框和自定义窗体..............................................................................................181
1.文件打开和另存为对话框.........................................................................................................183
2.GETOPENFILENAME和GETSAVEASFILENAME方法...................................................................................187
3.创建窗体.....................................................................................................................................188
4.创建用户窗体的工具.................................................................................................................190
5.标签.............................................................................................................................................191
6.文字框.........................................................................................................................................191
7.框架.............................................................................................................................................191
8.选项按钮.....................................................................................................................................191
9.复选框.........................................................................................................................................192
10.切换按钮...................................................................................................................................192
11.列表框.......................................................................................................................................192
12.复合框.......................................................................................................................................192
13.滚动条.......................................................................................................................................192
14.旋转按钮...................................................................................................................................192
15.图像...........................................................................................................................................192
16.多页控件...................................................................................................................................192
17.TABSTRIP控件.............................................................................................................................193
18.REFEDIT控件...............................................................................................................................193
19.在窗体上放置控件...................................................................................................................193
20.应用程序示例1：信息调查....................................................................................................193
21.在窗体上添加按钮、选项框和其它控件...............................................................................194
-----------------------页面7-----------------------
22.更改控件名称...........................................................................................................................197
23.设置其它控件属性...................................................................................................................197
24.准备工作表以储存窗体数据...................................................................................................198
25.显示自定义窗体.......................................................................................................................199
26.设置TAB顺序..............................................................................................................................199
27.了解窗体和控件事件...............................................................................................................200
28.编写VBA过程对窗体和控件事件反应.....................................................................................201
29.编写过程来初始化窗体...........................................................................................................201
30.编写过程填充列表框控件.......................................................................................................203
31.编写过程控制选项按钮...........................................................................................................203
32.编写过程同步文字框和旋转按钮...........................................................................................204
33.编写过程关闭用户窗体...........................................................................................................204
34.转移窗体数据到工作表...........................................................................................................205
35.使用INFOSURVEY应用程序.........................................................................................................206
36.应用程序示例2：学生和考试................................................................................................206
37.使用多页和TABSTRIP控件..........................................................................................................206
38.给窗体STUDENTSANDEXAMS自定义窗体编写VBA过程................................................................208
39.使用自定义窗体STUDENTSANDEXAMS.........................................................................................212
40.接下来……...............................................................................................................................214
第十一章自定义集合和类模块..........................................................................................214
1.使用集合.....................................................................................................................................214
2.声明自定义集合.........................................................................................................................215
3.给自定义集合添加对象.............................................................................................................215
4.从自定义集合移出对象.............................................................................................................216
5.创建自定义对象.........................................................................................................................217
6.创建类.........................................................................................................................................218
7.变量声明.....................................................................................................................................218
8.定义类的属性.............................................................................................................................218
9.创建PROPERTYGET过程.................................................................................................................219
10.创建PROPERTYLET过程...............................................................................................................219
11.创建类方法...............................................................................................................................220
12.创建类的示例...........................................................................................................................220
13.类模块里的事件过程...............................................................................................................221
14.创建用户界面...........................................................................................................................221
15.观察VBA过程的执行.................................................................................................................229
16.接下来……...............................................................................................................................231
第十二章使用VBA创建自定义菜单和工具栏.......................................................................231
1.工具栏.........................................................................................................................................232
2.创建自定义工具栏.....................................................................................................................233
3.删除自定义工具栏.....................................................................................................................235
4.使用COMMANDBAR的属性................................................................................................................235
5.使用COMMANDBAR控件....................................................................................................................235
6.理解和使用控件属性.................................................................................................................237
7.控件方法.....................................................................................................................................239
8.使用菜单.....................................................................................................................................240
9.菜单编程.....................................................................................................................................241
10.创建子菜单...............................................................................................................................243
11.修改内置快捷菜单...................................................................................................................244
12.创建快捷菜单...........................................................................................................................247
13.接下来……...............................................................................................................................249
第十三章调试VBA过程和处理错误.....................................................................................249
-----------------------页面8-----------------------
1.测试VBA过程...............................................................................................................................249
2.终止过程.....................................................................................................................................249
3.使用断点.....................................................................................................................................250
4.在中断模式下使用立即窗口.....................................................................................................253
5.使用STOP语句..............................................................................................................................254
6.添加监视表达式.........................................................................................................................254
7.清除监视表达式.........................................................................................................................256
8.使用快速监视.............................................................................................................................256
9.使用本地窗口和调用堆栈对话框.............................................................................................257
10.逐句运行VBA过程.....................................................................................................................258
11.逐句运行过程...........................................................................................................................259
12.逐过程执行过程.......................................................................................................................259
13.设置下一条语句.......................................................................................................................260
14.显示下一条语句.......................................................................................................................260
15.终止和重新设置VBA过程.........................................................................................................260
16.了解和使用条件编译...............................................................................................................260
17.操纵书签...................................................................................................................................262
18.捕捉错误...................................................................................................................................262
17.接下来……...............................................................................................................................266
第十四章微软EXCEL2002中的事件编程...........................................................................266
1.事件过程介绍.............................................................................................................................266
2.激活和失活事件.........................................................................................................................267
3.事件次序.....................................................................................................................................268
4.工作表事件.................................................................................................................................268
5.工作簿事件.................................................................................................................................272
6.图表事件.....................................................................................................................................282
7.内嵌图表事件.............................................................................................................................284
8.可为应用软件对象识别的事件.................................................................................................285
9.查询表时间.................................................................................................................................288
10.接下来……...............................................................................................................................289
第十五章在EXCEL里使用ACCESS........................................................................................289
1.对象库.........................................................................................................................................289
2.建立对对象库的引用.................................................................................................................292
3.链接到ACCESS...............................................................................................................................293
4.使用AUTOMATION链接到ACCESS数据库...........................................................................................293
5.使用DAO链接到ACCESS数据库.....................................................................................................295
6.使用ADO链接到ACCESS数据库.....................................................................................................295
7.从EXCEL执行ACCESS任务...............................................................................................................296
8.创建新ACCESS数据库...................................................................................................................296
9.打开ACCESS窗体...........................................................................................................................298
10.打开ACCESS报表.........................................................................................................................300
11.运行ACCESS查询.........................................................................................................................301
12.运行选择查询...........................................................................................................................302
13.运行参数查询...........................................................................................................................303
14.调用ACCESS函数.........................................................................................................................304
15.获取ACCESS数据到EXCEL工作表.................................................................................................304
16.使用GETROWS方法获取数据.......................................................................................................304
17.使用COPYFROMRECORDSET方法获取数据.......................................................................................305
18.使用TRANSFERSPREADSHEET方法获取数据....................................................................................306
19.使用OPENDATABASE方法...............................................................................................................307
20.从ACCESS数据创建文本文件.....................................................................................................309
21.从ACCESS数据创建查询表.........................................................................................................310
-----------------------页面9-----------------------
22.在EXCEL里使用ACCESS数据.........................................................................................................311
23.用ACCESS数据创建内嵌图表.....................................................................................................311
24.传输EXCEL电子表格到ACCESS数据库.........................................................................................313
25.将EXCEL电子表格链接到ACCESS数据库.....................................................................................313
26.将EXCEL电子表格导入ACCESS数据库.........................................................................................314
27.放置EXCEL数据到ACCESS表中.....................................................................................................314
28.接下来……...............................................................................................................................316
2.更改文件或文件夹名称（NAME函数）	145
3.检查文件或文件夹是否存在（DIR函数）	145
4.获得文件修改的日期和时间（FILEDATETIME函数）	147
5.获得文件大小（FILELEN函数）	147
6.返回和设置文件属性（GETATTR函数和SETATTR函数）	147
7.更改缺省文件夹或驱动器（CHDIR语句和CHDRIVE语句）	149
8.创建和删除文件夹（MKDIR语句和RMDIR语句）	149
9.复制文件（FILECOPY语句）	149
10.删除文件（KILL语句）	151
11.从文件读取和写入数据（INPUT/OUTPUT）	151
12.文件访问类型	152
13.使用顺序文件	152
14.读取储存于顺序文件里的数据	152
15.逐行读取文件	152
16.从顺序文件中读取字符	153
17.读取分隔文本文件	155
18.往顺序文件里写数据	155
19.使用WRITE # 和PRINT # 语句	156
20.操作随机文件	157
21.创建用户定义的数据类型	157
22.操作二进制文件	161
23.操作文件和文件夹的时髦方法	162
24.使用WSH获取文件信息	164
25.FILESYSTEMOBJEC的方法和属性	165
26.对象FILE的属性	168
27.文件夹对象属性	169
28.驱动器对象属性	169
29.使用WSH创建文本文件	170
30.使用WSH进行其它操作	172
31.运行其它应用程序	172
32.创建快捷方式	173
33.接下来……	174
第九章 利用VBA控制其它应用程序	174
1.启动应用程序	174
2.在应用程序之间切换	177
3.控制其它应用程序	177
4.控制应用程序的其它方法	179
5.了解自动控制	179
6.了解链接和嵌入	180
7.使用VBA进行链接和嵌入	181
8.COM和自动控制	182
9.了解绑定	182
10.后期绑定	182
11.早期绑定	182
12.建立到对象库的引用	183
13.创建自动控制对象	184
14.使用CREATEOBJECT函数	184
15.使用自动控制创建一个新的WORD文档	185
16.使用GETOBJECT函数	185
17.打开存在的WORD文档	186
18.使用关键字NEW	187
19.使用自动控制访问MICROSOFT OUTLOOK	188
20.接下来……	189
第十章 对话框和自定义窗体	189
1.文件打开和另存为对话框	192
2.GETOPENFILENAME和GETSAVEASFILENAME方法	196
3.创建窗体	197
4.创建用户窗体的工具	199
5.标签	200
6.文字框	200
7.框架	200
8.选项按钮	201
9.复选框	201
10.切换按钮	201
11.列表框	201
12.复合框	201
13.滚动条	201
14.旋转按钮	201
15.图像	201
16.多页控件	202
17.TABSTRIP控件	202
18.REFEDIT控件	202
19.在窗体上放置控件	202
20.应用程序示例1：信息调查	202
21.在窗体上添加按钮、选项框和其它控件	204
22.更改控件名称	206
23.设置其它控件属性	206
24.准备工作表以储存窗体数据	207
25.显示自定义窗体	208
26.设置TAB顺序	208
27.了解窗体和控件事件	209
28.编写VBA过程对窗体和控件事件反应	211
29.编写过程来初始化窗体	211
30.编写过程填充列表框控件	213
31.编写过程控制选项按钮	213
32.编写过程同步文字框和旋转按钮	214
33.编写过程关闭用户窗体	214
34.转移窗体数据到工作表	215
35.使用INFO SURVEY应用程序	216
36.应用程序示例2：学生和考试	216
37.使用多页和TABSTRIP控件	216
38.给窗体STUDENTS AND EXAMS自定义窗体编写VBA过程	218
39.使用自定义窗体STUDENTS AND EXAMS	223
40.接下来……	225
第十一章 自定义集合和类模块	225
1.使用集合	226
2.声明自定义集合	227
3.给自定义集合添加对象	227
4.从自定义集合移出对象	228
5.创建自定义对象	229
6.创建类	229
7.变量声明	229
8.定义类的属性	230
9.创建PROPERTY GET过程	230
10.创建PROPERTY LET过程	231
11.创建类方法	232
12.创建类的示例	232
13.类模块里的事件过程	232
14.创建用户界面	233
15.观察VBA过程的执行	242
16.接下来……	245
第十二章 使用VBA创建自定义菜单和工具栏	245
1.工具栏	245
2.创建自定义工具栏	247
3.删除自定义工具栏	249
4.使用COMMANDBAR的属性	249
5.使用COMMANDBAR控件	249
6.理解和使用控件属性	251
7.控件方法	253
8.使用菜单	254
9.菜单编程	256
10.创建子菜单	258
11.修改内置快捷菜单	260
12.创建快捷菜单	262
13.接下来……	264
第十三章 调试VBA过程和处理错误	264
1.测试VBA过程	265
2.终止过程	265
3.使用断点	266
4.在中断模式下使用立即窗口	269
5.使用STOP语句	271
6.添加监视表达式	271
7.清除监视表达式	274
8.使用快速监视	274
9.使用本地窗口和调用堆栈对话框	275
10.逐句运行VBA过程	276
11.逐句运行过程	277
12.逐过程执行过程	277
13.设置下一条语句	278
14.显示下一条语句	279
15.终止和重新设置VBA过程	279
16.了解和使用条件编译	279
17.操纵书签	281
18.捕捉错误	281
17.接下来……	285
第十四章 微软EXCEL 2002 中的事件编程	285
1.事件过程介绍	285
2.激活和失活事件	287
3.事件次序	289
4.工作表事件	289
5.工作簿事件	294
6.图表事件	312
7.内嵌图表事件	316
8.可为应用软件对象识别的事件	317
9.查询表时间	320
10.接下来……	323
第十五章 在EXCEL里使用ACCESS	323
1.对象库	323
2.建立对对象库的引用	329
3.链接到ACCESS	329
4.使用AUTOMATION链接到ACCESS数据库	331
5.使用DAO链接到ACCESS数据库	334
6.使用ADO链接到ACCESS数据库	334
7.从EXCEL执行ACCESS任务	336
8.创建新ACCESS数据库	336
9.打开ACCESS窗体	338
10.打开ACCESS报表	343
11.运行ACCESS查询	345
12.运行选择查询	347
13.运行参数查询	348
14.调用ACCESS函数	350
15.获取ACCESS数据到EXCEL工作表	350
16.使用GETROWS方法获取数据	350
17.使用COPYFROMRECORDSET方法获取数据	354
18.使用TRANSFERSPREADSHEET方法获取数据	354
19.使用OPENDATABASE方法	356
20.从ACCESS数据创建文本文件	360
21.从ACCESS数据创建查询表	363
22.在EXCEL里使用ACCESS数据	365
23.用ACCESS数据创建内嵌图表	365
24.传输EXCEL电子表格到ACCESS数据库	367
25.将EXCEL电子表格链接到ACCESS数据库	369
26.将EXCEL电子表格导入ACCESS数据库	370
27.放置EXCEL数据到ACCESS表中	370
28.接下来……	374
				
第一，vba日期和时间函数的基本用法
　　Excel中vba日期函数和时间函数分别是DATE和TIME。
　　VBA提供了三个无参数函数：Date、Time、Now，分别返回当前电脑系统的日期、时间、日期+时间。
　　下面的代码我们以三个消息框来结合日期和时间函数，分别提示当前的日期、时间。
Sub vba时间和日期函数()
    MsgBox Date
    MsgBox Tim




    

				
目         录 一、VBA语言基础...................................................................................................................1 第一节 标识符....................................................................................................................................1 第二节 运算符....................................................................................................................................1 第三节 数据类型................................................................................................................................1 第四节 变量与常量............................................................................................................................1 第五节 数组........................................................................................................................................2 第六节 注释和赋值语句....................................................................................................................2 第七节 书写规范................................................................................................................................2 第八节 判断语句................................................................................................................................2 第九节 循环语句................................................................................................................................3 第十节 其他类语句和错误语句处理................................................................................................4 第十一节 过程和函数........................................................................................................................4 一．Sub过程................................................................. 4 二．Function函数............................................................ 5 三．Property属性过程和Event事件过程 ......................................... 5 第十二节内部函数.............................................................................................................................5 一．测试函数................................................................ 5 二．数学函数................................................................ 5 三．字符串函数.............................................................. 5 四．转换函数................................................................ 6 五．时间函数................................................................ 6 第十三节 文件操作............................................................................................................................6 文件........................................................................ 6 删除........................................................................ 6 打开........................................................................ 6 读入........................................................................ 7 写入........................................................................ 7 关闭........................................................................ 7 其他文件函数................................................................ 7 二、VISUAL BASIC程序设计网络教学.....................................................................................1 第一课 VBA是什么 .................................................................................................................1 1.1 VBA是什么....................................................................................................................................1 1.2 EXCEL环境中基于应用程序自动化的优点................................................................................1 1.3 录制简单的宏..............................................................................................................................1 1.4 执行宏..........................................................................................................................................2 1.5 查看录制的代码..........................................................................................................................2 1.6 编辑录制的代码..........................................................................................................................3 1.7 录制宏的局限性..........................................................................................................................3 1.8 小结..............................................................................................................................................3 第二课 处理录制的宏............................................................................................................3 2.1 为宏指定快捷键..........................................................................................................................3 2.2 决定宏保存的位置......................................................................................................................4 2.3 个人宏工作簿..............................................................................................................................4 2.3.1 保存宏到个人宏工作簿 .................................................. 4 2.3.2 使用并编辑个人宏工作簿中的宏 .......................................... 4 2.4 将宏指定给按钮..........................................................................................................................4 2.5 将宏指定给图片或其他对象......................................................................................................5 2.6 小结..............................................................................................................................................5 第三课 学习控件...................................................................................................................5 
3.1 EXCEL开发过程简介....................................................................................................................5 3.2 认识不同的控件..........................................................................................................................5 3.3 向工作表添加控件......................................................................................................................6 3.4 设置控件的特性..........................................................................................................................6 3.5 给控件命名..................................................................................................................................6 3.6 使用用户窗体..............................................................................................................................6 3.7 疑难解答......................................................................................................................................7 第四课 理解变量和变量的作用..............................................................................................7 4.1 代码存在的位置：模块..............................................................................................................7 4.2 对模块的概览..............................................................................................................................7 4.2.1 创建过程.............................................................. 8 4.2.2 运行宏................................................................ 9 4.3 保存对模块所做的改变..............................................................................................................9 4.4 变量..............................................................................................................................................9 4.4.1 变量的数据类型........................................................ 9 4.4.2 用Dim语句创建变量(声明变量) .......................................... 10 4.4.3 变量命名的惯例....................................................... 10 4.4.4 使用数组............................................................. 10 4.4.5 变量赋值............................................................. 11 第五课 利用VBA设置工作表使用权限...................................................................................11 1．使用WITH语句。 ..........................................................................................错误！未定义书签。 2．使用对象变量。.........................................................................................错误！未定义书签。 方法 3：减少对象的激活和选择 ....................................................................错误！未定义书签。 方法 4：关闭屏幕更新....................................................................................错误！未定义书签。 第六课 提高EXCEL中VBA的效率............................................................................................12 方法 1：尽量使用VBA原有的属性、方法和WORKSHEET函数............................................................12 方法 2：尽量减少使用对象引用，尤其在循环中.........................................................................12 1．使用With语句。.......................................................... 12 2．使用对象变量。.......................................................... 12 3．在循环中要尽量减少对象的访问。 .......................................... 13 方法 3：减少对象的激活和选择 ....................................................................................................13 方法 4：关闭屏幕更新....................................................................................................................13 第七课 如何在EXCEL里使用定时器.......................................................................................13 三、学习微软 EXCEL 2002 VBA 编程和XML，ASP技术...........................................................15 第一章 电子表格自动化简介和了解宏命令...........................................................................15 1 了解宏............................................................................................................................................15 2 宏命令的普通应用........................................................................................................................15 3 写宏之前的计划............................................................................................................................16 4 录制宏............................................................................................................................................17 5 运行宏............................................................................................................................................18 6 修改宏代码....................................................................................................................................19 7 添加注释........................................................................................................................................21 8 分析宏代码....................................................................................................................................22 9 清除宏代码....................................................................................................................................23 10 测试修改好的宏..........................................................................................................................24 11 两个层面运行宏的方法..............................................................................................................24 12 完善你的宏代码..........................................................................................................................25 13 重新命名宏..................................................................................................................................27 14 运行宏的其它方法......................................................................................................................27 
15 使用键盘快捷键运行宏..............................................................................................................27 16 通过菜单运行宏..........................................................................................................................28 17 通过工具栏按钮运行宏..............................................................................................................30 18 通过工作表里面的按钮运行宏..................................................................................................31 19 保存宏..........................................................................................................................................32 20 打印宏..........................................................................................................................................32 21 保存宏在个人宏工作簿..............................................................................................................32 22 打开含有宏的工作簿..................................................................................................................34 23VB编辑窗口...................................................................................................................................35 24 了解工程浏览窗口......................................................................................................................35 25 了解属性窗口..............................................................................................................................36 26 了解代码窗口..............................................................................................................................36 27 VB编辑器里的其它窗口..............................................................................................................38 28 接下来……..................................................................................................................................39 第二章 VBA 第一步..............................................................................................................39 1 了解指令，模块和过程................................................................................................................39 2 VBA工程命名..................................................................................................................................39 3 模块重命名....................................................................................................................................40 4 从其它工程调用过程....................................................................................................................41 5 了解对象，属性和方法................................................................................................................42 6 学习对象，属性和方法................................................................................................................43 7 句法和文法....................................................................................................................................45 8 打断很长的VBA语句......................................................................................................................47 9 了解VBA错误..................................................................................................................................47 10 查找帮助......................................................................................................................................49 11 语法和编程快捷助手..................................................................................................................50 12 属性/方法列表............................................................................................................................51 13 常数列表......................................................................................................................................51 14 参数信息......................................................................................................................................52 15 快速信息......................................................................................................................................52 16 自动完成关键字..........................................................................................................................52 17 缩进/凸出....................................................................................................................................53 18 设置注释块/解除注释块............................................................................................................53 19 使用对象浏览器..........................................................................................................................53 20 使用VBA对象库............................................................................................................................58 21 用对象浏览器来定位过程..........................................................................................................59 22 使用立即窗口..............................................................................................................................59 23 获取立即窗口里的信息..............................................................................................................61 24 学习对象......................................................................................................................................62 25 电子表格单元格操作..................................................................................................................62 26 使用RANGE属性..............................................................................................................................62 27 使用CELLS属性..............................................................................................................................62 28 使用OFFSET属性............................................................................................................................63 29 选择单元格的其它方法..............................................................................................................64 30 选择行和列..................................................................................................................................64 31 获取工作表信息..........................................................................................................................65 32 往工作表输入数据......................................................................................................................65 33 返回工作表中的信息..................................................................................................................65 34 单元格格式..................................................................................................................................66 35 移动，复制和删除单元格..........................................................................................................66 36 操作工作簿和工作表..................................................................................................................67 37 操作窗口（WINDOWS）...................................................................................................................67 38 管理EXCEL应用程序......................................................................................................................68 
39 接下来……..................................................................................................................................68 第三章 了解变量，数据类型和常量.....................................................................................69 1 保存VBA语句的结果......................................................................................................................69 2 变量是什么....................................................................................................................................69 3 数据类型........................................................................................................................................69 4 如何产生变量................................................................................................................................70 5 如何声明变量................................................................................................................................71 6 明确变量的数据类型....................................................................................................................72 7 变量赋值........................................................................................................................................73 8 强制声明变量................................................................................................................................75 9 了解变量范围................................................................................................................................76 10 过程级别（当地）变量..............................................................................................................76 11 模块级别变量..............................................................................................................................77 12 工程级别变量..............................................................................................................................77 13 变量的存活期..............................................................................................................................78 14 了解和使用静态变量..................................................................................................................78 15 声明和使用对象变量..................................................................................................................79 16 使用明确的对象变量..................................................................................................................80 17 查找变量定义..............................................................................................................................80 18 在VB过程里面使用常量..............................................................................................................80 19 内置常量......................................................................................................................................81 20 接下来……..................................................................................................................................82 第四章 VBA过程：子程序和函数..........................................................................................82 1.关于函数过程...............................................................................................................................82 2.创建函数过程...............................................................................................................................82 3.执行函数过程...............................................................................................................................84 4.从工作表里运行函数过程...........................................................................................................84 5.从另外一个VBA过程里运行函数过程 .........................................................................................85 6.传递参数.......................................................................................................................................86 7.明确参数类型...............................................................................................................................87 8.按地址和按值传递参数...............................................................................................................88 9.使用可选的参数...........................................................................................................................88 10.定位内置函数.............................................................................................................................89 11.使用MSGBOX函数...........................................................................................................................90 12.MSGBOX函数的运行值...................................................................................................................94 13.使用INPUTBOX函数........................................................................................................................95 14.数据类型转变.............................................................................................................................96 15.使用INPUTBOX方法........................................................................................................................97 16.使用主过程和子过程...............................................................................................................100 17.接下来……...............................................................................................................................102 第五章 基于VBA做决定 ......................................................................................................102 1.关系和逻辑运算符.....................................................................................................................102 2.IF…THEN语句...............................................................................................................................103 3.基于多于一个条件的决定.........................................................................................................105 4.THE IF…THEN…ELSE语句.............................................................................................................106 5.IF…THEN…ELSEIF语句................................................................................................................108 6.嵌套的IF…THEN语句...................................................................................................................110 7.SELECT CASE语句...........................................................................................................................110 8.和CASE子句一起使用IS...............................................................................................................112 9.确定CASE子句里数值的范围 ......................................................................................................113 10.在CASE子句里确定多个表达式.................................................................................................114 
11.接下来…...................................................................................................................................114 第六章 在VBA中重复操作...................................................................................................114 1.DO LOOPS: DO…WHILE和DO…UNTIL................................................................................................114 2.观察过程执行.............................................................................................................................117 3.WHILE…WEND循环..........................................................................................................................118 4.FOR…NEXT 循环 ...........................................................................................................................119 5.FOR EACH…NEXT循环.....................................................................................................................120 7.提前跳出循环.............................................................................................................................121 8.循环嵌套.....................................................................................................................................122 9.接下来….....................................................................................................................................122 第七章 利用VBA数组管理数据清单和表格..........................................................................122 1.了解数组.....................................................................................................................................123 2.声明数组.....................................................................................................................................124 3.数组的上界和下界.....................................................................................................................124 4.在VBA过程里使用数组...............................................................................................................124 5.数组和循环语句.........................................................................................................................125 6.使用二维数组.............................................................................................................................127 7.静态和动态数组.........................................................................................................................128 8.数组函数.....................................................................................................................................129 9.ARRAY函数.....................................................................................................................................130 10.ISARRAY函数...............................................................................................................................130 11.ERASE函数...................................................................................................................................131 12.LBOUND函数和UBOUND函数 ..........................................................................................................131 13.数组中的错误...........................................................................................................................132 14.数组作为参数...........................................................................................................................134 15.接下来…...................................................................................................................................134 第八章 利用VBA操纵文件和文件夹.....................................................................................134 1.获取当前文件夹的名称（CURDIR函数）...................................................................................135 2.更改文件或文件夹名称（NAME函数）.......................................................................................135 3.检查文件或文件夹是否存在（DIR函数）................................................................................136 4.获得文件修改的日期和时间（FILEDATETIME函数）.................................................................137 5.获得文件大小（FILELEN函数）.................................................................................................138 6.返回和设置文件属性（GETATTR函数和SETATTR函数） .............................................................138 7.更改缺省文件夹或驱动器（CHDIR语句和CHDRIVE语句）.........................................................139 8.创建和删除文件夹（MKDIR语句和RMDIR语句）........................................................................140 9.复制文件（FILECOPY语句）........................................................................................................140 10.删除文件（KILL语句） ............................................................................................................142 11.从文件读取和写入数据（INPUT/OUTPUT）...............................................................................142 12.文件访问类型...........................................................................................................................142 13.使用顺序文件...........................................................................................................................143 14.读取储存于顺序文件里的数据 ...............................................................................................143 15.逐行读取文件...........................................................................................................................143 16.从顺序文件中读取字符...........................................................................................................144 17.读取分隔文本文件...................................................................................................................145 18.往顺序文件里写数据...............................................................................................................146 19.使用WRITE # 和PRINT # 语句....................................................................................................147 20.操作随机文件...........................................................................................................................148 21.创建用户定义的数据类型.......................................................................................................148 22.操作二进制文件.......................................................................................................................152 23.操作文件和文件夹的时髦方法 ...............................................................................................153 24.使用WSH获取文件信息.............................................................................................................155 
25.FILESYSTEMOBJEC的方法和属性..................................................................................................156 26.对象FILE的属性 ........................................................................................................................160 27.文件夹对象属性.......................................................................................................................161 28.驱动器对象属性.......................................................................................................................161 29.使用WSH创建文本文件.............................................................................................................162 30.使用WSH进行其它操作.............................................................................................................164 31.运行其它应用程序...................................................................................................................164 32.创建快捷方式...........................................................................................................................165 33.接下来……...............................................................................................................................166 第九章 利用VBA控制其它应用程序.....................................................................................167 1.启动应用程序.............................................................................................................................167 2.在应用程序之间切换.................................................................................................................169 3.控制其它应用程序.....................................................................................................................170 4.控制应用程序的其它方法.........................................................................................................171 5.了解自动控制.............................................................................................................................172 6.了解链接和嵌入.........................................................................................................................172 7.使用VBA进行链接和嵌入...........................................................................................................173 8.COM和自动控制...........................................................................................................................174 9.了解绑定.....................................................................................................................................174 10.后期绑定...................................................................................................................................174 11.早期绑定...................................................................................................................................174 12.建立到对象库的引用...............................................................................................................175 13.创建自动控制对象...................................................................................................................176 14.使用CREATEOBJECT函数...............................................................................................................176 15.使用自动控制创建一个新的WORD文档.....................................................................................177 16.使用GETOBJECT函数....................................................................................................................177 17.打开存在的WORD文档 ................................................................................................................178 18.使用关键字NEW..........................................................................................................................179 19.使用自动控制访问MICROSOFT OUTLOOK.......................................................................................180 20.接下来……...............................................................................................................................181 第十章 对话框和自定义窗体..............................................................................................181 1.文件打开和另存为对话框.........................................................................................................183 2.GETOPENFILENAME和GETSAVEASFILENAME方法...................................................................................187 3.创建窗体.....................................................................................................................................188 4.创建用户窗体的工具.................................................................................................................190 5.标签.............................................................................................................................................191 6.文字框.........................................................................................................................................191 7.框架.............................................................................................................................................191 8.选项按钮.....................................................................................................................................191 9.复选框.........................................................................................................................................192 10.切换按钮...................................................................................................................................192 11.列表框.......................................................................................................................................192 12.复合框.......................................................................................................................................192 13.滚动条.......................................................................................................................................192 14.旋转按钮...................................................................................................................................192 15.图像...........................................................................................................................................192 16.多页控件...................................................................................................................................192 17.TABSTRIP控件 .............................................................................................................................193 18.REFEDIT控件...............................................................................................................................193 19.在窗体上放置控件...................................................................................................................193 20.应用程序示例 1：信息调查 ....................................................................................................193 21.在窗体上添加按钮、选项框和其它控件 ...............................................................................194 
22.更改控件名称...........................................................................................................................197 23.设置其它控件属性...................................................................................................................197 24.准备工作表以储存窗体数据 ...................................................................................................198 25.显示自定义窗体.......................................................................................................................199 26.设置TAB顺序..............................................................................................................................199 27.了解窗体和控件事件...............................................................................................................200 28.编写VBA过程对窗体和控件事件反应 .....................................................................................201 29.编写过程来初始化窗体...........................................................................................................201 30.编写过程填充列表框控件.......................................................................................................203 31.编写过程控制选项按钮...........................................................................................................203 32.编写过程同步文字框和旋转按钮 ...........................................................................................204 33.编写过程关闭用户窗体...........................................................................................................204 34.转移窗体数据到工作表...........................................................................................................205 35.使用INFO SURVEY应用程序.........................................................................................................206 36.应用程序示例 2：学生和考试 ................................................................................................206 37.使用多页和TABSTRIP控件..........................................................................................................206 38.给窗体STUDENTS AND EXAMS自定义窗体编写VBA过程................................................................208 39.使用自定义窗体STUDENTS AND EXAMS .........................................................................................212 40.接下来……...............................................................................................................................214 第十一章 自定义集合和类模块..........................................................................................214 1.使用集合.....................................................................................................................................214 2.声明自定义集合.........................................................................................................................215 3.给自定义集合添加对象.............................................................................................................215 4.从自定义集合移出对象.............................................................................................................216 5.创建自定义对象.........................................................................................................................217 6.创建类.........................................................................................................................................218 7.变量声明.....................................................................................................................................218 8.定义类的属性.............................................................................................................................218 9.创建PROPERTY GET过程.................................................................................................................219 10.创建PROPERTY LET过程...............................................................................................................219 11.创建类方法...............................................................................................................................220 12.创建类的示例...........................................................................................................................220 13.类模块里的事件过程...............................................................................................................221 14.创建用户界面...........................................................................................................................221 15.观察VBA过程的执行.................................................................................................................229 16.接下来……...............................................................................................................................231 第十二章 使用VBA创建自定义菜单和工具栏.......................................................................231 1.工具栏.........................................................................................................................................232 2.创建自定义工具栏.....................................................................................................................233 3.删除自定义工具栏.....................................................................................................................235 4.使用COMMANDBAR的属性................................................................................................................235 5.使用COMMANDBAR控件....................................................................................................................235 6.理解和使用控件属性.................................................................................................................237 7.控件方法.....................................................................................................................................239 8.使用菜单.....................................................................................................................................240 9.菜单编程.....................................................................................................................................241 10.创建子菜单...............................................................................................................................243 11.修改内置快捷菜单...................................................................................................................244 12.创建快捷菜单...........................................................................................................................247 13.接下来……...............................................................................................................................249 第十三章 调试VBA过程和处理错误.....................................................................................249 
1.测试VBA过程...............................................................................................................................249 2.终止过程.....................................................................................................................................249 3.使用断点.....................................................................................................................................250 4.在中断模式下使用立即窗口.....................................................................................................253 5.使用STOP语句 ..............................................................................................................................254 6.添加监视表达式.........................................................................................................................254 7.清除监视表达式.........................................................................................................................256 8.使用快速监视.............................................................................................................................256 9.使用本地窗口和调用堆栈对话框 .............................................................................................257 10.逐句运行VBA过程.....................................................................................................................258 11.逐句运行过程...........................................................................................................................259 12.逐过程执行过程.......................................................................................................................259 13.设置下一条语句.......................................................................................................................260 14.显示下一条语句.......................................................................................................................260 15.终止和重新设置VBA过程.........................................................................................................260 16.了解和使用条件编译...............................................................................................................260 17.操纵书签...................................................................................................................................262 18.捕捉错误...................................................................................................................................262 17.接下来……...............................................................................................................................266 第十四章 微软EXCEL 2002 中的事件编程...........................................................................266 1.事件过程介绍.............................................................................................................................266 2.激活和失活事件.........................................................................................................................267 3.事件次序.....................................................................................................................................268 4.工作表事件.................................................................................................................................268 5.工作簿事件.................................................................................................................................272 6.图表事件.....................................................................................................................................282 7.内嵌图表事件.............................................................................................................................284 8.可为应用软件对象识别的事件 .................................................................................................285 9.查询表时间.................................................................................................................................288 10.接下来……...............................................................................................................................289 第十五章 在EXCEL里使用ACCESS........................................................................................289 1.对象库.........................................................................................................................................289 2.建立对对象库的引用.................................................................................................................292 3.链接到ACCESS...............................................................................................................................293 4.使用AUTOMATION链接到ACCESS数据库...........................................................................................293 5.使用DAO链接到ACCESS数据库.....................................................................................................295 6.使用ADO链接到ACCESS数据库.....................................................................................................295 7.从EXCEL执行ACCESS任务...............................................................................................................296 8.创建新ACCESS数据库...................................................................................................................296 9.打开ACCESS窗体...........................................................................................................................298 10.打开ACCESS报表.........................................................................................................................300 11.运行ACCESS查询.........................................................................................................................301 12.运行选择查询...........................................................................................................................302 13.运行参数查询...........................................................................................................................303 14.调用ACCESS函数.........................................................................................................................304 15.获取ACCESS数据到EXCEL工作表.................................................................................................304 16.使用GETROWS方法获取数据.......................................................................................................304 17.使用COPYFROMRECORDSET方法获取数据.......................................................................................305 18.使用TRANSFERSPREADSHEET方法获取数据....................................................................................306 19.使用OPENDATABASE方法...............................................................................................................307 20.从ACCESS数据创建文本文件.....................................................................................................309 21.从ACCESS数据创建查询表.........................................................................................................310 
22.在EXCEL里使用ACCESS数据.........................................................................................................311 23.用ACCESS数据创建内嵌图表.....................................................................................................311 24.传输EXCEL电子表格到ACCESS数据库.........................................................................................313 25.将EXCEL电子表格链接到ACCESS数据库.....................................................................................313 26.将EXCEL电子表格导入ACCESS数据库.........................................................................................314 27.放置EXCEL数据到ACCESS表中.....................................................................................................314 28.接下来……...............................................................................................................................316
				
以前用Excel2003做了些宏，在网上还有不少粉丝，因一些功能在Excel2010中无法使用，故重新整理，欢迎指正；
本Excel中的宏在Excel2010中测试表现出色;
运行宏前，要保证EXCEL没有禁用宏。
Michael Ho   QQ: 9900060
-----------------------
本Excel有以下功能：
插入图片1
1.点击执行后，会出现文件夹选择窗，请选择你JPG图片所在文件夹(选择“文件夹”而不是选择文件)；
2.宏会自动复制Sheet2到新工作簿，并插入你所选文件夹中的全部JPG图片到B列，对应的图片名自动填到C列；
3.图片的大小会自动适应Sheet2的B3单元格，因此可以在点击执行前调整Sheet2的B3单元格的大小来控制插入图片的大小。
--------
插入图片2
1.点击执行后，会出现文件夹选择窗，请选择你JPG图片所在文件夹(选择“文件夹”而不是选择文件)；
2.宏会自动复制Sheet3到新工作簿，并插入你所选文件夹中的全部JPG图片制作图册，对应的图片名自动填到图片下方；
--------
插入图片3
如果用户自己的Excel文件中有一列是型号，该宏可以插入指定文件夹里以型号命名的JPG图片到另一列；
1.打开本Excel文件，不要关闭；
2.再另外打开你自己需要操作的另一个Excel文件，并保持你要操作的工作表做为当前活动工作表；
3.在你的文件中按Ctrl+I (或在你的文件中手动执行宏，然后选择本EXCEL文件中的宏InsertPic3）；
4.然后会出现文件夹选择窗，请选择你JPG图片所在文件夹(选择“文件夹”而不是选择文件)；
5.在弹出的对话框中指定型号在第几列，图片要插入到第几列，以及从哪一行开始；
6.图片的大小会自动适应你设定的第一行要插入图片的单元格，因此提前调整那个单元格的大小可以控制插入图片的大小。
-------------
删除活动工作表中所有图片     Ctrl+d
删除活动工作表里所有的JPG图片，（不一定是本工作簿中的工作表）；
1.打开本Excel文件，不要关闭；
2.再另外打开你自己需要操作的另一个Excel文件，并保持你要操作的工作表做为当前活动工作表；
3.在你的文件中按Ctrl+d (或在你的文件中手动执行宏，然后选择本EXCEL文件中的宏DelPic）；
-------------
导出活动工作表中被选中的一张JPG图片   Ctrl+e
导出活动工作表中被选中的一张JPG图片，（不一定是本工作簿中的工作表）；
1.打开本Excel文件，不要关闭；
2.再另外打开你自己需要操作的另一个Excel文件，并保持你要操作的工作表做为当前活动工作表；
3.请选中一张要导出的图片；
4.在你的文件中按Ctrl+e (或在你的文件中手动执行宏，然后选择本EXCEL文件中的宏OutputOnePic）；
5.在弹出的对话框中指定图片要保存的名字；
1.不管图片在Excel中是否被缩放过，导出的图片是按图片的原始尺寸进行保存。
2.在桌面上会自动新建一个"OutputPic"的文件夹，导出的图片将会存在那个文夹里；
3.如果文件夹中已有相同名字的文件，则后面导出的文件会自动加上(v1), (v2), (v3)...
-------------
导出活动工作表中所有JPG图片   Ctrl+f
导出活动工作表中所有JPG图片，并且图片名自动使用指定列中的图片名；
1.打开本Excel文件，不要关闭；
2.再另外打开你自己需要操作的另一个Excel文件，并保持你要操作的工作表做为当前活动工作表；
3.在你的文件中按Ctrl+f (或在你的文件中手动执行宏，然后选择本EXCEL文件中的宏OutputAllPic）；
4.在弹出的对话框中指定图片所在列，图片名所在的列；
1.不管图片在Excel中是否被缩放过，导出的图片是按图片的原始尺寸进行保存；
2.在桌面上会自动新建一个"OutputPic"的文件夹，所有导出的图片将会存在那个文夹里；
3.如果文件夹中已有相同名字的文件，则后面导出的文件会自动加上(v1), (v2), (v3)...
----------------
对指定文件夹中的JPG图片进行重命名   Ctrl+r
利用活动工作表中的所有图片的旧名与新名的对照，对指定文件夹中JPG图片进行重命名；
1.打开本Excel文件，不要关闭；
2.再另外打开你自己需要操作的另一个Excel文件，并保持你要操作的工作表做为当前活动工作表；
3.在你的文件中按Ctrl+r (或在你的文件中手动执行宏，然后选择本EXCEL文件中的宏RenamePic）；
4.在弹出的对话框中指定图片旧名所在列和图片新名所在的列；
1.可以结合插入图片的宏，将所有图片的旧名输入到Excel中，再在另一列中填上新图片名，然后使用该宏。
2.如果顺利运行，会在原来那个文件夹下面新建一个叫“New”的子文件夹，所有重命好名的图片会自动放入子文件夹里；
3.如果文件夹中已有相同名字的文件，则后面的文件会覆盖原来的文件。
                        <button type="button" class="btn btn-outline-secondary" id="ImportTitles" onclick="importTitles()">导入试题</button>
原先，我的HTML里面有写了文件上传表单，并设置改
很简单，直接用转换函数就可以了，例如：CDate("2012-12-31")
2、日期之间的天数
用datediff函数，注意，工作表单元格中用的函数名称是datedif，少了一个f，而且参数顺序也不一样。例如：
dt = Cells(2, 1)     ' 单元格内容：2013-1-1 09:35:08
dd = DateDiff("D",
Sub RemoveFilterFromAllExcelFilesInCurrentFolder()
    Dim objFSO As Object
    Dim objFolder As Object
    Dim objFile As Object
    Dim objExcel As Object
    Dim objWorkbook As Object
    Dim objWorksheet As Object
    '获取当前文件夹路径
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.GetFolder(Application.ActiveWorkbook.Path)
    '循环处理每个 Excel 文件
    For Each objFile In objFolder.Files
        If Right(objFile.Name, 5) = ".xlsx" Or Right(objFile.Name, 4) = ".xls" Then '仅处理 Excel 文件
            Set objExcel = CreateObject("Excel.Application")
            Set objWorkbook = objExcel.Workbooks.Open(objFile.Path)
            '循环处理每个工作表
            For Each objWorksheet In objWorkbook.Worksheets
                '检查是否有筛选器
                If objWorksheet.AutoFilterMode Then
                    objWorksheet.AutoFilterMode = False '解除筛选
                End If
            Next objWorksheet
            objWorkbook.Close SaveChanges:=True
            objExcel.Quit
            Set objWorkbook = Nothing
            Set objExcel = Nothing
        End If
    Next objFile
    Set objFolder = Nothing
    Set objFSO = Nothing
End Sub
这段代码与前面的代码几乎相同，只是在获取文件夹路径的方式不同。它使用 `Application.ActiveWorkbook.Path` 来获取当前活动工作簿所在的文件夹路径。您可以将代码复制到 VBA 编辑器中 (按 Alt + F11 进入)，然后按 F5 运行代码即可。