百度360必应搜狗淘宝本站头条
当前位置:网站首页 > 编程网 > 正文

VBA高级应用30例应用1:确保打开文件时响应事件

yuyutoo 2024-10-20 13:05 13 浏览 0 评论

《VBA高级应用30例》(版权10178985),是我推出的第十套教程,教程是专门针对高级学员在学习VBA过程中提高路途上的案例展开,这套教程案例与理论结合,紧贴“实战”,并做“战术总结”,以便大家能很好的应用。教程的目的是要求大家在实际工作中分发VBA程序,写好的程序可以升级

本套教程共三册三十个专题,VBA高级应用30例应用1:确保打开文件时响应事件

分享成果,随喜正能量】 日子是活给自己看的,不是来源于别人的指指点点;日子是活给时光看的,别让时光的压力把咱压得喘不过气来。。


应用1 在EXCEL中构建加载项

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
  • 第三方应用软件:OfficeRibbonXEditor-NETFramework-Installer.EXE
  • 实现的外接应用程序:mynzSheetTools.xlma


我20多年的VBA实践经验,全部浓缩在下面的各个教程中:

相关推荐

墨尔本一华裔男子与亚裔男子分别失踪数日 警方寻人

中新网5月15日电据澳洲新快网报道,据澳大利亚维州警察局网站消息,22岁的华裔男子邓跃(Yue‘Peter’Deng,音译)失踪已6天,维州警方于当地时间13日发布寻人通告,寻求公众协助寻找邓跃。华...

网络交友须谨慎!美国犹他州一男子因涉嫌杀害女网友被捕

伊森·洪克斯克(图源网络,侵删)据美国广播公司(ABC)25日报道,美国犹他州一名男子于24日因涉嫌谋杀被捕。警方表示,这名男子主动告知警局,称其杀害了一名在网络交友软件上认识的25岁女子。雷顿警...

一课译词:来龙去脉(来龙去脉 的意思解释)

Mountainranges[Photo/SIPA]“来龙去脉”,汉语成语,本指山脉的走势和去向,现比喻一件事的前因后果(causeandeffectofanevent),可以翻译为“i...

高考重要考点:range(range高考用法)

range可以用作动词,也可以用作名词,含义特别多,在阅读理解中出现的频率很高,还经常作为完形填空的选项,而且在作文中使用是非常好的高级词汇。...

C++20 Ranges:现代范围操作(现代c++白皮书)

1.引言:C++20Ranges库简介C++20引入的Ranges库是C++标准库的重要更新,旨在提供更现代化、表达力更强的方式来处理数据序列(范围,range)。Ranges库基于...

学习VBA,报表做到飞 第二章 数组 2.4 Filter函数

第二章数组2.4Filter函数Filter函数功能与autofilter函数类似,它对一个一维数组进行筛选,返回一个从0开始的数组。...

VBA学习笔记:数组:数组相关函数—Split,Join

Split拆分字符串函数,语法Split(expression,字符,Limit,compare),第1参数为必写,后面3个参数都是可选项。Expression为需要拆分的数据,“字符”就是以哪个字...

VBA如何自定义序列,学会这些方法,让你工作更轻松

No.1在Excel中,自定义序列是一种快速填表机制,如何有效地利用这个方法,可以大大增加工作效率。通常在操作工作表的时候,可能会输入一些很有序的序列,如果一一录入就显得十分笨拙。Excel给出了一种...

Excel VBA入门教程1.3 数组基础(vba数组详解)

1.3数组使用数组和对象时,也要声明,这里说下数组的声明:'确定范围的数组,可以存储b-a+1个数,a、b为整数Dim数组名称(aTob)As数据类型Dimarr...

远程网络调试工具百宝箱-MobaXterm

MobaXterm是一个功能强大的远程网络工具百宝箱,它将所有重要的远程网络工具(SSH、Telnet、X11、RDP、VNC、FTP、MOSH、Serial等)和Unix命令(bash、ls、cat...

AREX:携程新一代自动化回归测试工具的设计与实现

一、背景随着携程机票BU业务规模的不断提高,业务系统日趋复杂,各种问题和挑战也随之而来。对于研发测试团队,面临着各种效能困境,包括业务复杂度高、数据构造工作量大、回归测试全量回归、沟通成本高、测试用例...

Windows、Android、IOS、Web自动化工具选择策略

Windows平台中应用UI自动化测试解决方案AutoIT是开源工具,该工具识别windows的标准控件效果不错,但是当它遇到应用中非标准控件定义的UI元素时往往就无能为力了,这个时候选择silkte...

python自动化工具:pywinauto(python快速上手 自动化)

简介Pywinauto是完全由Python构建的一个模块,可以用于自动化Windows上的GUI应用程序。同时,它支持鼠标、键盘操作,在元素控件树较复杂的界面,可以辅助我们完成自动化操作。我在...

时下最火的 Airtest 如何测试手机 APP?

引言Airtest是网易出品的一款基于图像识别的自动化测试工具,主要应用在手机APP和游戏的测试。一旦使用了这个工具进行APP的自动化,你就会发现自动化测试原来是如此简单!!连接手机要进行...

【推荐】7个最强Appium替代工具,移动App自动化测试必备!

在移动应用开发日益火爆的今天,自动化测试成为了确保应用质量和用户体验的关键环节。Appium作为一款广泛应用的移动应用自动化测试工具,为测试人员所熟知。然而,在不同的测试场景和需求下,还有许多其他优...

取消回复欢迎 发表评论: