【分享成果,随喜正能量】忍一句,息一怒,饶一着,退一步,得饶人处且饶人,输的是嘴,赢的是心。。
《VBA高级应用30例》,是我推出的第十套教程,教程是专门针对高级学员在学习VBA过程中提高路途上的案例展开,这套教程案例与理论结合,紧贴“实战”,并做“战术总结”,以便大家能很好的应用。教程的目的是要求大家在实际工作中分发VBA程序,写好的程序可以升级。本套教程共三册三十个专题,今日内容是第一个专题“在EXCEL中构建加载项”,今日讲解:如何形成加载项文件
应用1 在EXCEL中构建加载项
Excel是一个功能非常强大的应用程序,具有数千个选项和功能,可帮助我们构建模型、报告和数据分析。但是,在我们日常工作中往往也会需要一些额外的功能,这就需要我们使用VBA来扩充。本文将给大家展示如何创建一个小型实用程序,我将概述来创建外接程序的所有步骤。这些步骤的使用可以帮助大家构建自己的自定义应用。
9 确保打开文件时响应事件最后,我们希望在工作簿打开时就会调用代码,以便外接程序立即开始响应这些事件。因此,在这个工作簿中,我添加了如下代码:
Private Sub Workbook_Open()
Application.OnTime Now, "'" & ThisWorkbook.FullName & "'!Init"
End Sub
上述代码中我使用OnTime方法,可以确保Excel在调用Init之前加载所有内容。有时,Excel甚至在完成内部管理之前就触发工作簿打开事件。
10 创建外接程序创建外接程序非常简单,只需单击“文件”“另存为”,在保存文件类型中选择“Excel加载宏”选项:
另存为对话框:
选择保存类型:
我们也可以换成自己喜欢的名称,我提供的程序文件中加载宏文件为:mynzSheetTools.xlma
- 选择Excel加载项时,Excel会将文件夹更改为系统上的标准加载项文件夹,这足让人感到困惑。因为我们从来都不想在那里保存我的加载项,这让们人很恼火。我们只需单击“上一步”按钮即可返回上次打开文件(或将文件保存到)的原始文件夹:
11 验证我们的程序
我们随便打开一个工作薄:
然后找到我们的刚才建立的加载宏,mynzSheetTools.xlma。双击打开,此时刚才打开的工作薄会出现下面的变化:
我们点击“工作表工具”:
此时我们就可以利用刚才我们的工具了,点击“Table of contents”:
同时,我们在选择工作表的选项中选择工作表,选择后该工作表会自动激活:
到此,我们从立项到任务完成就全部完成了。
结论: 利用VBA创建我们自己的应用程序接口是一项十分有意义的工作,本专题中我讲解了一个应用程序如何立项,如何规范用户的需求,一直到各个功能的实现,都进行了详细的讲解。最后给大家展示了我们的成果。本文涉及到了很多的VBA知识点,包括高级类的内容。希望本专题的内容对于大家开发应用程序有所帮助。
今日内容回向:
1 应用程序立项过程要完成那些工作?
2 如何实现高版本office功能区的自定义?
3 如何把我们的应用程序另存为加载项?
- 本讲内容参考程序文件:高级应用01.xlsm
- 第三方应用软件:Office RibbonXEditor-NETFramework-Installer.EXE
- 实现的外接应用程序:mynzSheetTools.xlma
我20多年的VBA实践经验,全部浓缩在下面的各个教程中:
【分享成果,随喜正能量】凡从善者,身有所正,言有所规,行有所止。人生当如是, 知敬畏,懂进退,尊重每一个生命,不冷漠,不漠视,去关怀,善待身边的每一个事物,每一条生命。因为敬畏生命,也是善待自己。。
,