实例介绍
1.VBA零基础者,通过本书踏入VBA的门槛。 2.已有VBA基础但需要扩充知识面者。本书涉及的VBA知识全面详尽,包含了VBA所必须的基础知识,同时提供正则表达式、FSO、字典、注册表、功能区设计和封装代码等边缘性知识,从而让读者对VBA掌握得更全面。 3.已对VBA有相当的认识,但想开发更专业的商业软件者。本书对开发加载宏、自动化加载项和COM加载项都有详细的阐述。同时还提供制作安装程序的教学思路。
【实例截图】
【核心代码】
4744302543346233132.zip
└── Excel VBA程序开发自学宝典(第3版)案例文件
└── 案例文件
├── 第一章
│ ├── 1-1 一键提取身份证信息.xlsm
│ └── 1-2 合并工作簿
│ ├── 一车间.xlsx
│ ├── 三车间.xlsx
│ ├── 二车间.xlsx
│ ├── 四车间.xlsx
│ └── 汇总表.xlsm
├── 第七章
│ ├── 7-10 多条件时间判断.xlsm
│ ├── 7-11 按格式显示今日日期标题.xlsm
│ ├── 7-12 按指定值设置单元格背景色.xlsm
│ ├── 7-13 累加1到100之间的自然数和偶数.xlsm
│ ├── 7-14 使用循环语句删除前20行.xlsm
│ ├── 7-15 罗列本年度所有周日的日期.xlsm
│ ├── 7-16 判断区域中是否存在合并单元格.xlsm
│ ├── 7-17 分班.xlsm
│ ├── 7-18 利用For Next循环语句创建工作表目录.xlsm
│ ├── 7-19 利用For Each Next循环语句创建工作表目录.xlsm
│ ├── 7-1 行列求和.xlsm
│ ├── 7-20 选择B和E列所有负数所在单元格.xlsm
│ ├── 7-21 统一图片高度及边距.xlsm
│ ├── 7-22 计算第几日产量正常.xlsm
│ ├── 7-23 按格式查找.xlsm
│ ├── 7-24 计算得分累积到1000的场次.xlsm
│ ├── 7-25 利用循环产生文字动画.xlsm
│ ├── 7-26 重新描述错信息.xlsm
│ ├── 7-27 指定错误的处理方式.xlsm
│ ├── 7-28 防错处理一.xlsm
│ ├── 7-29 防错处理二.xlsm
│ ├── 7-2 在输入框中指定名称然后创建文件夹.xlsm
│ ├── 7-30 防错处理三.xlsm
│ ├── 7-31 浏览并获取指定路径名称.xlsm
│ ├── 7-32 浏览并选择文件.xlsm
│ ├── 7-33 按类型浏览文件.xlsm
│ ├── 7-3 根据月份判断季度.xlsm
│ ├── 7-4 计算当前Excel的年份版本号.xlsm
│ ├── 7-5 禁止打印总表以外的工作表.xlsm
│ ├── 7-6 允许8到18点开启工作簿.xlsm
│ ├── 7-7 打开文件且复制其已用区域的值.xlsm
│ ├── 7-8 在输入框中指定名称然后创建文件夹.xlsm
│ ├── 7-9 双击录入勾与叉.xlsm
│ └── 生产表.xlsx
├── 第三章
│ ├── 3-1 为过程添加注释.xlsm
│ ├── 3-2 公有过程与私有过程.xlsm
│ ├── 3-3 改变程序的执行流程.xlsm
│ └── 3-4 结束或暂停过程.xlsm
├── 第九章
│ ├── 9-10 模糊查找.xlsm
│ ├── 9-11 反向选择.xlsm
│ ├── 9-12 插入图片且调整为选区的大小.xlsm
│ ├── 9-13 提取唯一值.xlsm
│ ├── 9-14 隐藏所有错误值.xlsm
│ ├── 9-15 批量为批注添加日期.xlsm
│ ├── 9-16 生成图片批注.xlsm
│ ├── 9-17 生成个性化批注.xlsm
│ ├── 9-18 批量修改所有批注的外观.xlsm
│ ├── 9-19 新建工作表且以今日日期命名.xlsm
│ ├── 9-1 计算字符表达式.xlsm
│ ├── 9-20 批量保护工作表与解除保护.xlsm
│ ├── 9-21 为工作表设置可打印的水印.xlsm
│ ├── 9-22(2) Collection对象的应用.xlsm
│ ├── 9-22 批量命名工作表.xlsm
│ ├── 9-23 获取工作表的筛选条件.xlsm
│ ├── 9-24 拆分工作簿.xlsm
│ ├── 9-25 每10分钟备份工作簿.xlsm
│ ├── 9-29 5分钟不编辑则自动备份工作簿.xlsm
│ ├── 9-2 合并相同且相邻的单元格.xlsm
│ ├── 9-30(2) 只能打开3次的工作簿.xlsm
│ ├── 9-30 记录文件打开次数.xlsm
│ ├── 9-31 不打开工作簿而获取其数据.xlsm
│ ├── 9-32 创建工作簿及工作表目录.xlsm
│ ├── 9-3 定时执行程序.xlsm
│ ├── 9-4 模拟键盘快捷键打开高级选项.xlsm
│ ├── 9-5 使用快捷键合并与取消单元格.xlsm
│ ├── 9-6 在状态栏显示超期未付款的客户名称.xlsm
│ ├── 9-7 合并工作表.xlsm
│ ├── 9-8 合并选区且保留所有值.xlsm
│ ├── 9-9 合并计算-2.xlsm
│ ├── 9-9 合并计算.xlsm
│ ├── 人事资料
│ │ └── 人事报表.xls
│ ├── 水印.jpg
│ └── 生产表
│ ├── 一车间.xls
│ ├── 三车间.xls
│ ├── 二车间.xls
│ └── 四车间.xls
├── 第二十一章
│ ├── 1.jpg
│ ├── 21-10 在复选框与命令按钮之间添加分隔条.xlsm
│ ├── 21-11 创建弹出式菜单.xlsm
│ ├── 21-12 创建拆分按钮.xlsm
│ ├── 21-13 创建下拉列表.xlsm
│ ├── 21-14 创建编辑框.xlsm
│ ├── 21-15 禁用内置功能.xlsm
│ ├── 21-17 1到3号能使用的命令按钮.xlsm
│ ├── 21-17 创建按下与弹起时自动切换图标的按钮.xlsm
│ ├── 21-18 创建一个能显示图形对象数量的标签.xlsm
│ ├── 21-19 通过编辑框执行精确查找.xlsm
│ ├── 21-1 内置图标浏览器.xlsm
│ ├── 21-20 在组的标签处显示问候语.xlsm
│ ├── 21-21 创建图片库.xlsm
│ ├── 21-22 通过复选框控制错误标识的显示状态.xlsm
│ ├── 21-23 工作表目录.xlsm
│ ├── 21-2 隐藏功能区.xlsm
│ ├── 21-3 隐藏开始选项卡.xlsm
│ ├── 21-4 创建新选项卡.xlsm
│ ├── 21-5 创建新组.xlsm
│ ├── 21-6 创建对话框启动器.xlsm
│ ├── 21-7 在自定义选项卡中创建命令按钮.xlsm
│ ├── 21-8 创建切换按钮.xlsm
│ ├── 21-9 创建标签与复选框.xlsm
│ ├── 2.jpg
│ ├── A.ico
│ ├── OfficeCustomUIEditorSetup.rar
│ ├── 多功能样本.xml
│ └── 组模板.xml
├── 第二十三章
│ ├── 安装程序
│ │ ├── setup.exe
│ │ ├── 信息.txt
│ │ ├── 图标.ICO
│ │ ├── 安装程序.iss
│ │ ├── 文本与数值互换.dll
│ │ └── 许可.txt
│ ├── 封装函数
│ │ ├── MSSCCPRJ.SCC
│ │ ├── 合计.cls
│ │ ├── 我的函数.dll
│ │ ├── 我的函数.exp
│ │ ├── 我的函数.lib
│ │ ├── 我的函数.vbp
│ │ └── 我的函数.vbw
│ └── 文本与数值互换
│ ├── Connect.DCA
│ ├── Connect.Dsr
│ ├── Module1.bas
│ ├── MSSCCPRJ.SCC
│ ├── VB3F9B.tmp
│ ├── VB47AB.tmp
│ ├── VB9FA8.tmp
│ ├── 卸载.bat
│ ├── 安装.bat
│ ├── 文本与数值互换.dll
│ ├── 文本与数值互换.exp
│ ├── 文本与数值互换.lib
│ ├── 文本与数值互换.RES
│ ├── 文本与数值互换.vbp
│ └── 文本与数值互换.vbw
├── 第二十二章
│ ├── 快速查找.xlam
│ ├── 文本与数值互换.xlsm
│ ├── 日历控件.xlam
│ └── 日历控件.xlsm
├── 第二十四章
│ ├── 数据录入助手.xlam
│ ├── 数据录入助手.xlsm
│ └── 测试表.xlsx
├── 第二十章
│ ├── 20-1 记录当前工作簿最后一次打开时间.xlsm
│ ├── 20-2 创建文件目录时自动记忆上次的路径.xlsm
│ ├── 20-3 让是否显示零值的设置适用于所有工作表.xlsm
│ └── 20-4 控制U盘是否可用.xlsm
├── 第二章
│ ├── 2-1 录制宏.xlsm
│ └── 2-2 调用子过程的五种方法.xlsm
├── 第五章
│ ├── 5-1 三个数据类型错误案例.xlsm
│ ├── 5-2 正确指定变量类型的优势.xlsm
│ ├── 5-3 正确指定变量类型的优势2.xlsm
│ ├── 5-4 变量的作用域.xlsm
│ ├── 5-5 三种错误的对象变量赋值方式.xlsm
│ └── 5-6 使用对象变量提升程序效率.xlsm
├── 第八章
│ ├── 8-10 自动设置工作表页眉.xlsm
│ ├── 8-11 未汇总则禁止关闭工作簿.xlsm
│ ├── 8-12 阅读模式.xlsm
│ ├── 8-13 启用宏才能开启的工作簿.xlsm
│ ├── 8-1 自动宏.xlsm
│ ├── 8-2 启用与禁用事件.xlsm
│ ├── 8-3 在状态栏提示最大值的单元格地址.xlsm
│ ├── 8-4 快速录入出勤表.xlsm
│ ├── 8-5 选区字符统计.xlsm
│ ├── 8-6 在批注中存放所有修改记录.xlsm
│ ├── 8-7 利用数字简化公司名称输入.xlsm
│ ├── 8-8 自动跳过公式区.xlsm
│ └── 8-9 背景着色.xlsm
├── 第六章
│ ├── 6-10 图形对象名称.xlsm
│ ├── 6-11 DrawingObjects应用.xlsm
│ ├── 6-1 使用对象变量和With语句简化引用.xlsm
│ ├── 6-2 With语句的嵌套应用.xlsm
│ ├── 6-3 颜色编码与颜色的对应关系.xlsm
│ ├── 6-4 删除活动单元格的值.xlsm
│ ├── 6-5 将第1工作表的已用区域的值复制到第2个工作表.xlsm
│ ├── 6-6 将三个工作表的细明数据复制到总表中.xlsm
│ ├── 6-7 在指定区域双击录入日期.xlsm
│ ├── 6-8 Range.End属性的应用.xlsm
│ ├── 6-9 获取指定坐标下的对象.xlsm
│ └── 鼠标移过单元格时在状态栏显示地址.xlsm
├── 第十一章
│ ├── 11-1 必选参数.xlsm
│ ├── 11-2 可选参数.xlsm
│ └── 11-3 不确定数量的参数.xlsm
├── 第十七章
│ ├── 17-10 设计超链接.xlsm
│ ├── 17-11 让列表框随鼠标移动而更新数据.xlsm
│ ├── 17-12 让文字框仅能录入6位数字.xlsm
│ ├── 17-13 鼠标调整文字框宽度.xlsm
│ ├── 17-14 为控件设置帮助信息.xlsm
│ ├── 17-15 设计启动LOGO.xlsm
│ ├── 17-16 权限验证(用户andy密码123).xlsm
│ ├── 17-17 设计计划任务向导.xlsm
│ ├── 17-18 设计动画帮助.xlsm
│ ├── 17-19 利用窗体预览图片.xlsm
│ ├── 17-1 Excel 5.0对话框.xlsm
│ ├── 17-20 多工作表录入.xlsm
│ ├── 17-20 跨工作表查询.xlsm
│ ├── 17-2 通过代码修改窗体中的命令按钮字体颜色.xlsm
│ ├── 17-3 使用代码为命令按钮指定Picture属性.xlsm
│ ├── 17-4 将工作表中的数据显示在复合框中.xlsm
│ ├── 17-5 播放Flash动画.xlsm
│ ├── 17-6 激活窗体时将在列表框中创建工作表目录.xlsm
│ ├── 17-7 双击时关闭窗体.xlsm
│ ├── 17-8 让窗体只能显示在左上角.xlsm
│ ├── 17-9 窗按下左键移动窗体、按下右键移动控件.xlsm
│ ├── 1.jpg
│ └── 图片
│ ├── 10.jpg
│ ├── 11.jpg
│ ├── 12.jpg
│ ├── 13.jpg
│ ├── 14.jpg
│ ├── 15.jpg
│ ├── 16.jpg
│ ├── 17.jpg
│ ├── 18.jpg
│ ├── 19.jpg
│ ├── 1.jpg
│ ├── 20.jpg
│ ├── 2.jpg
│ ├── 3.jpg
│ ├── 4.jpg
│ ├── 5.jpg
│ ├── 6.jpg
│ ├── 7.jpg
│ ├── 8.jpg
│ └── 9.jpg
├── 第十三章
│ ├── 13-10 将职员表整理为学历分类表.xlsm
│ ├── 13-11 将选区的数据在文本与数值间互换.xlsm
│ ├── 13-12 获取两列数据的相同项.xlsm
│ ├── 13-1 数组与非数组的效率比较.xlsm
│ ├── 13-2 罗列不及格人员姓名与成绩.xlsm
│ ├── 13-3 罗列多个班级的不及格人员姓名与成绩.xlsm
│ ├── 13-4 Split函数的应用.xlsm
│ ├── 13-5 从路径中取文件名与根目录.xlsm
│ ├── 13-6 Filter函数应用.xlsm
│ ├── 13-7 将指定区域的单词统一为首字母大写.xlsm
│ ├── 13-8 罗列不及格人员姓名、科目和成绩.xlsm
│ ├── 13-9 跨表搜索学员信息.xlsm
│ ├── 合并工作簿
│ │ ├── 一车间.xlsx
│ │ ├── 三车间.xlsx
│ │ ├── 二车间.xlsx
│ │ ├── 四车间.xlsx
│ │ └── 汇总表.xlsm
│ └── 帮助纠错.txt
├── 第十九章
│ ├── 19-1 类模块应用模板.xlsm
│ ├── 19-2 在状态栏显示当前行的最大值与最小值地址.xlsm
│ ├── 19-3 录入数据时自动将M后面的2显示为上标.xlsm
│ ├── 19-4 为按钮批量指定鼠标的MOVE事件.xlsm
│ └── 19-5 颜色面板.xlsm
├── 第十二章
│ ├── 12-1 录制宏并修改代码批量创建复选框.xlsm
│ └── VBA代码百宝箱.rar
├── 第十五章
│ ├── 15-1 用代码引用字典对象或者删除引用.xlsm
│ ├── 15-2 字典的方法和属性.xlsm
│ ├── 15-3 创建三级选单.xlsm
│ ├── 15-4 分类汇总.xlsm
│ ├── 15-5 标示重复值.xlsm
│ ├── 15-6 计算产量冠军的夺冠次数和平均产量.xlsm
│ └── 15-7 按品名统计半年内的产量合计.xlsm
├── 第十八章
│ ├── 18-1 获得所有磁盘的信息.xlsm
│ ├── 18-2 操作文件夹.xlsm
│ ├── 18-3 让D盘中所有隐藏文件夹显示出来.xlsm
│ ├── 18-4 遍历子文件夹创建文件目录.xlsm
│ ├── 18-5 删除D盘中大小为0的文件夹.xlsm
│ └── 18-6 罗列最近三天修改过的所有文件的名称.xlsm
├── 第十六章
│ ├── ~$16-9 按条件合并.xlsm
│ ├── 16-10 合并区域或数组的值.xlsm
│ ├── 16-11 按颜色对区域进行条件求和.xlsm
│ ├── 16-12 按颜色从左向向右查找所有数据.xlsm
│ ├── 16-13 合计分隔符左边的所有数值.xlsm
│ ├── 16-14 为函数分类及添加说明.xlsm
│ ├── 16-1 根据业绩计算奖金.xlsm
│ ├── 16-2 判断活动工作簿中是否有图形对象.xlsm
│ ├── 16-3 计算当前页数.xlsm
│ ├── 16-4 根据合并单元格合计数据.xlsm
│ ├── 16-5 创建工作表目录.xlsm
│ ├── 16-6 分段提取数值.xlsm
│ ├── 16-7 获取极值的地址.xlsm
│ ├── 16-8 对前N大值求和.xlsm
│ └── 16-9 按条件合并.xlsm
├── 第十四章
│ ├── 14-10 按指定长度匹配任意字符.xlsm
│ ├── 14-11 正向预查.xlsm
│ ├── 14-12 正向预查应用2.xlsm
│ ├── 14-13 负正向预查.xlsm
│ ├── 14-14 贪婪匹配与惰性匹配.xlsm
│ ├── 14-15 汇总采购金额.xlsm
│ ├── 14-16 计算建筑面积.xlsm
│ ├── 14-17 汇总括号中的数值.xlsm
│ ├── 14-18 去除首尾空白字符.xlsm
│ ├── 14-19 数字分列.xlsm
│ ├── 14-1 前期绑定与后期绑定.xlsm
│ ├── 14-20 获取Email地址.xlsm
│ ├── 14-21 返回文件名与路径.xlsm
│ ├── 14-22 仅汇总人民币.xlsm
│ ├── 14-23 分列的高级应用.xlsm
│ ├── 14-24 标示重复字词.xlsm
│ ├── 14-2 两个正则表达式模板.xlsm
│ ├── 14-3 删除字符串的所有数字.xlsm
│ ├── 14-4 提取字符串的所有数字.xlsm
│ ├── 14-5 贪婪匹配与惰性匹配.xlsm
│ ├── 14-6 认识可选匹配.xlsm
│ ├── 14-7 限量匹配.xlsm
│ ├── 14-8 转换电话薄格式.xlsm
│ └── 14-9 位置匹配.xlsm
├── 第十章
│ ├── 10-1 代码分行.xlsm
│ ├── 10-2 代码缩进.xlsm
│ ├── 10-3 使用内置常量名称代替数值.xlsm
│ ├── 10-4 并闭屏幕更新提升工作效率.xlsm
│ ├── 10-5 使用With提升代码的书写效率和执行效率.xlsm
│ ├── 10-6 对小于B1的单元格填充背景.xlsm
│ ├── 10-7 使用带$的函数优化程序.xlsm
│ ├── 10-8 用Instr函数简化字符串判断.xlsm
│ └── 10-9 使用Replace简化字符串连接.xlsm
├── 第四章
│ ├── 4-1 获取第3个批注内容.xlsm
│ ├── 4-2 名称的三种访问方式.xlsm
│ ├── 4-3 单元格对象的两种访问方式.xlsm
│ ├── 4-4 活动对象的省略与否问题.xlsm
│ ├── 4-5 打开工作簿时在A1显示日期.xlsm
│ └── 4-6 在状态栏显示当前被修改的单元格地址.xlsm
└── 附录
├── ~$B Excel 2010对象大全.docx
├── 附录A Msgbox函数用法说明.pdf
├── 附录B Excel 2010对象大全.pdf
├── 附录C Excel 2010的新增事件.pdf
├── 附录D Excel 2010所有内置常数枚举.docx
├── 附录E 命令按钮属性一览.pdf
├── 附录F 文本框属性一览.pdf
├── 附录G 列表框属性一览.pdf
└── 附录H 365个常见问题与答案.pdf
35 directories, 329 files
标签:
小贴士
感谢您为本站写下的评论,您的评论对其它用户来说具有重要的参考价值,所以请认真填写。
- 类似“顶”、“沙发”之类没有营养的文字,对勤劳贡献的楼主来说是令人沮丧的反馈信息。
- 相信您也不想看到一排文字/表情墙,所以请不要反馈意义不大的重复字符,也请尽量不要纯表情的回复。
- 提问之前请再仔细看一遍楼主的说明,或许是您遗漏了。
- 请勿到处挖坑绊人、招贴广告。既占空间让人厌烦,又没人会搭理,于人于己都无利。
关于好例子网
本站旨在为广大IT学习爱好者提供一个非营利性互相学习交流分享平台。本站所有资源都可以被免费获取学习研究。本站资源来自网友分享,对搜索内容的合法性不具有预见性、识别性、控制性,仅供学习研究,请务必在下载后24小时内给予删除,不得用于其他任何用途,否则后果自负。基于互联网的特殊性,平台无法对用户传输的作品、信息、内容的权属或合法性、安全性、合规性、真实性、科学性、完整权、有效性等进行实质审查;无论平台是否已进行审查,用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。本站所有资源不代表本站的观点或立场,基于网友分享,根据中国法律《信息网络传播权保护条例》第二十二与二十三条之规定,若资源存在侵权或相关问题请联系本站客服人员,点此联系我们。关于更多版权及免责申明参见 版权及免责申明
网友评论
我要评论