首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

如果工作簿是由另一个工作簿的宏打开的,则Workbook_Open中的ExcelAnt加载项将无法运行

在Excel中,宏是一种用于自动化任务的编程代码。当一个工作簿被打开时,可以使用Workbook_Open事件来执行一些特定的操作。ExcelAnt是一种加载项,它可以扩展Excel的功能,并提供额外的功能和工具。

然而,如果一个工作簿是由另一个工作簿的宏打开的,Workbook_Open事件中的ExcelAnt加载项将无法运行。这是因为宏的执行顺序会导致ExcelAnt加载项在工作簿打开之前加载,从而无法正常运行。

解决这个问题的一种方法是将ExcelAnt加载项的代码移动到工作簿的其他事件中,例如Workbook_Activate事件。这样,在工作簿被激活时,ExcelAnt加载项的代码将会执行。

另外,如果需要在工作簿打开时运行ExcelAnt加载项,可以考虑使用其他的解决方案,例如将ExcelAnt加载项的代码嵌入到工作簿的宏中,或者使用其他的宏加载项来代替ExcelAnt。

腾讯云提供了一系列的云计算产品,包括云服务器、云数据库、云存储等。这些产品可以帮助用户在云端进行计算、存储和管理数据。如果您对腾讯云的产品感兴趣,可以访问腾讯云官方网站了解更多信息:https://cloud.tencent.com/

页面内容是否对你有帮助?
有帮助
没帮助

相关·内容

VBA实战技巧32:安装Excel加载

这两种方法操作演示如下图2所示。 图2 如果加载不在“可用加载”列表必须单击该对话框右侧“浏览”按钮,进行查找,然后将其添加到可用加载列表。...图4 每个键都包含要打开加载名称(有时还包含一些命令行参数)。如果加载不在加载文件夹包含完整路径。 注意,这些注册表项在关闭Excel后更新。...如果用户直接打开压缩文件(zip文件)下载,然后打开加载xlam文件存储在临时位置(如果安装了解压缩软件),或者位于名称包含.zip文件夹。...如果单击“”按钮,运行下面的代码来安装加载: If ActiveWorkbook Is Nothing Then AddEmptyBook Set oAddIn =Application.AddIns.Add...最后一行关闭加载打开所有工作簿。为什么?因为当没有活动工作簿时你无法打开加载对话框,显然这也会阻止Excel通过VBA加载添加到列表

4.6K20

VBA代码库10:强制用户启用

有时,必须确保用户在打开工作簿时启用,否则就不能实现工作簿效果。由于无法使用打开,因此需要一种确保用户启用技术。...下面讲解方法隐藏除“欢迎”工作表(告诉用户启用)之外所有工作表,并在每次保存工作簿时强制执行该工作表。如果用户在启用了情况下打开工作簿将不会隐藏所有工作表。...还可以使用Excel VeryHidden属性来实现工作隐藏,这意味着不能使用Excel菜单来取消隐藏工作表。但是,这只会影响该工作簿,因此用户可以使用另一个工作簿取消隐藏所有工作表。...但是,在关闭文件时确实会产生一个非常小问题。如果用户尝试退出该应用程序,它将关闭工作簿,而不是Excel。再次退出完全关闭Excel。...代码放置在ThisWorkbook代码模块。 2. 工作簿应该有一个名为“欢迎”工作表,否则你要将代码前面的常量WelcomePage设置为用户没有启用提示工作表名称。

2.3K40

VBA专题10-6:使用VBA操控Excel界面之执行命令以及激活功能区选项卡两种方法

下面展示执行不在功能区命令另一个示例: '启动计算器程序 Application.CommandBars.ExecuteMso "Calculator" 接下来示例执行功能区命令,它们通过功能区控件图形化呈现...SendKeys方法 例如,下面的VBA代码模拟按下ALT、A和ALT键: Application.SendKeys "%A%" 将上面的语句放在Workbook_Open事件,在打开工作簿时,激活...创建新工作簿并将其保存为启用工作簿。 3. 关闭该工作簿并在CustomUI Editor打开。 4....,有一个VBA过程名称赋给它,本例过程命名为Initialize,当打开工作簿时调用此过程。...要激活特定内置功能区选项卡,例如“数据”选项卡,使用下面的代码: myRibbon.ActivateTabMso "TabData" 如果要在打开工作簿时激活“数据”选项卡,在Initialize过程插入上面的语句

3.6K20

Excel实战技巧78: 创建个人工作簿

个人工作簿一个文件,可以在应用程序开启时运行其中VBA代码,就像是运行功能区选项卡命令一样。创建个人工作簿很简单,如下所示。...步骤1:打开一个Excel工作簿,单击功能区“开发工具”选项卡“录制”命令,在弹出“录制”对话框,选取“保存在”下拉列表框“个人工作簿”,如下图1所示。单击“确定”。 ?...图3 下面,我们《Excel实战技巧77:实现在当前工作表和前一个使用工作表之间自由切换》创建快捷键功能放到个人工作簿,以便于在所有打开工作簿中都能使用这个功能。...ThisWorkbook模块,输入代码: '打开工作簿运行 Private Sub Workbook_Open() Call TabBack_Run End Sub 保存并关闭Excel文件,...注意,因为个人工作簿功能可以应用到所有工作簿,所以在编写代码时应使用ActiveWorkbook,而不是ThisWorkbook。

2.6K30

一起学Excel专业开发21:Excel工时报表与分析系统开发(3)——自定义用户界面

Excel 2003及以前版本,虽然Excel 2007及以后版本将用户界面原来菜单和工具栏修改成了现在功能区,但仍能加载原来自定义用户界面,只是将它们放置在功能区“加载”选项卡。...设置背景图片 最简便方法应用程序工作簿一个工作表作为其“桌面”,向其中添加背景图片,并将工作簿最大化,设置工作显示属性使其显示范围扩大到整个Excel窗口,去除工作簿窗口中控制框和最大最小化按钮...'关闭任何现有的结果工作簿 '询问要打开工作簿名称 '检查它是否结果工作簿,然后将其打开 Sub MenuFileOpen() Dim vFile As Variant '在创建新工作簿前关闭现有的结果工作簿...'因此不会收到任何Workbook_Activate事件 '或者正在打开工作簿Workbook_Open事件 Application.EnableEvents = False...专业开发17:Excel工时报表与分析系统开发(2)——创建特定应用加载,我们使用加载和模板创建每周工时表并将它们存储到工作区,ConsolidateWorkbooks过程用来获取这些工时表工作簿并将它们合并和分析

1.9K10

Excel事件(四)事件顺序

工作簿事件顺序 操作工作簿时常用事件产生顺序如下: 1、workbook_open事件:打开工作簿时产生该事件 2、workbook_activate事件:打开工作簿时产生该事件。...如果有多个工作簿切换工作簿时也产生该事件 3、workbook_beforesave事件:保存工作簿之前产生该事件 4、workbook_beforeclose事件:关闭工作簿之前产生该事件 5、...workbook_deactivate事件:关闭工作簿时,在beforeclose事件之后产生该事件,如果有多个工作簿,在切换工作簿时,非激活状态工作簿产生该事件。...下面先演示一个错误示例(无法停止,只能关闭excel文件。请勿模仿)。 在相应工作,当用户更改了单元格内容时,会第一次触发worksheet_change事件。...所以正确使用方法,就是用户更改单元格触发worksheet_change事件时,在代码把事件触发关闭。然后运行修改代码后,再恢复事件触发。代码就正常运行

2.3K30

一起学Excel专业开发17:Excel工时报表与分析系统开发(2)——创建特定应用加载

注:所谓特定应用加载指只能在专门为它所设计工作簿工作一类加载。...Excel工时报表与分析系统(PETRAS)加载功能: 1.启动和初始化应用程序 2.为应用程序各项功能创建工具栏 3.打开和初始化“工时输入”工作簿 4.允许用户数据输入工作簿内容复制到预先设定好合并区...'如果没有打开, 打开.如果打开,激活....然后,初始化所有全局变量,这里两个全局变量,一个用于存放加载完整路径,一个用于指明加载是否在关闭过程。接着,查找用户接口工作簿如果找到继续运行程序,否则显示错误信息并退出应用程序。...,已定义好设置应用到这些工作

96420

问与答121:如何让用户输入密码后才能使用Excel文件?

例如,在没有到规定日期之前,可以正常使用,超过规定日期,则需要输入密码,如果密码不正确,删除Excel文件。...A:可以在工作簿Open事件编写代码来实现,如下: Public MyDate As Variant Private Sub WorkBook_Open() Dim mbox MyDate...本程序测试/评估期已到期." &vbCrLf & _ "请询问相关人员获取更新实用程序....=True Sheets("Intro").Visible =False End If End If End Sub 这里存在一个Bug,就是用户不启用时...我们可以在工作簿打开时强制用户启用。具体方法参见:《问与答10:如何强制用户启用?》。 注:今天问题来自于chandoo.org论坛,供有兴趣朋友学习参考。

1.2K80

Excel VBA事件

1、事件: 事件,和日常生活差不多,就是发生了什么事情。...在Excel里,能发生事件很多: 打开、关闭工作簿 新建工作簿 新建工作表 激活工作表 选择单元格 单元格改写 ………… 这些都是事件,其实就是平时手动操作Excel一些动作。...在Excel VBA里提供了接口,在发生这些事件之前或者之后,让使用者可以设置一段运行程序。 比如双击打开工作簿,可以设置运行一段程序: ?...上面就是一个工作簿打开事件,运行一段程序: Private Sub Workbook_Open() MsgBox "工作簿打开了" End Sub 这种格式固定,必须按照这种模式,Excel...这几个模块也可以像普通模块一样编写代码,但是一般都是存放一些事件代码,像上面的Workbook_Open必须放在ThisWorkbook模块里面才会有效果

1.4K30

Excel: 使用Windows任务计划程序定时自动打开指定工作簿

文章背景:上文(参见文末参考资料[1])提到,通过Application.OnTime定时执行工作簿VBA代码,但是它并不是一个可靠解决方案。...如果Excel文件关闭,使用 Application.OnTime 安排过程也会暂停。本文通过Windows任务计划程序,每天早上8点自动打开指定路径工作簿,然后激活工作表test。...系统:win10 (1)打开工作簿,在工程窗口中,找到ThisWorkbook,添加如下代码: Private Sub Workbook_Open() Worksheets("test")....Activate End Sub 这样,当打开工作簿时,程序会自动激活名称为test工作表。...测试任务:在一切设置完成后,您可以手动运行该任务以测试是否可以成功打开指定工作簿并激活工作表"test"。

45510

恶意软件分析–恶意

还观察到,当受害者打开文档时,执行一个workbook_open),该向受害者显示一个消息框,表明“ Microsoft Excel停止工作”(在中进行硬编码)。...当受害者打开excel文件时,XLS文件会提示用户启用。如果用户启用了,则用户收到提示“ Excel已停止工作”。...在搜索VBA脚本时,我们还发现“本工作簿工作表包含某种脚本,这些脚本在以下几点中逐一定义: A)首先,我们提取了在“此工作簿工作运行脚本,我们发现该脚本正在创建一个带有故意消息消息框,即...依存关系 以下恶意软件代码已观察到依赖性以及执行所需用户交互。 据观察,当受害者打开文档并启用时,此恶意软件提供了“自动运行/自动执行”功能。被感染计算机会自动建立文件创建和CnC连接。...该恶意软件设计与Windows环境兼容。 以下此攻击完整流程图。 通过分析发现行为 以下此恶意软件行为: 当受害者打开文档并启用时,受害者看到以下消息框。

2K10

Excel揭秘25:突破数据有效性列表字符限制

使用单元格区域 然而,如果使用逗号分隔字符串作为数据列表来源,你会发现这样字符串字符数被限制为255个字符,超过此限制字符串根本无法输入到数据来源。...下面,让我们核查一下这个超长列表是否被保存了。工作簿保存为.xlsm文件后,关闭该工作簿。...然后,将其扩展名更改为.zip,接着打开这个压缩文件,导航到xl文件夹,打开数据有效性所在工作表,示例sheet2.xml,打开它,你可以看到formula1元素下有71个已被保存到文件,如下图...图3 关闭打开压缩文件夹,将其扩展名改回.xlsm,然后在Excel打开,你会发现Excel弹出下图4所示提示信息。 ? 图4 如果单击“”,选择修复,将会弹出下图5所示提示信息。 ?...图5 在打开工作簿,数据有效性列表已被删除。 复修记录并没有告诉我们数据有效性列表被移除原因,但可以肯定,列表字符数超出了字符数限制。

2.3K20

Excel实战技巧:创建带有自定义功能区Excel加载

创建这个带有自定义功能区Excel加载将可以有任意工作簿中使用,下面我们详细讲解其创建过程。...第1 步:创建一个新工作簿,将其保存为启用工作簿(本示例使用名称MyCustomRibbon.xlsm)。 第2步:单击“文件——信息”,选择“属性——高级属性”,如下图1所示。...图7 在“加载”对话框,选择刚才创建“自定义界面加载”,如下图8所示。如果在“可用加载”列表没有出现自已创建加载单击“浏览”按钮,导航到加载所在文件夹,选择该加载即可。...图8 此时,在Excel工作簿功能区中出现了一个新选项卡,如下图9所示。单击选项卡组按钮,会调用相应显示信息。 图9 第7步:修改成中文。...最后,压缩文件扩展名恢复为正常加载扩展名。打开Excel,可以看到自定义选项卡已经修改成了中文,如下图11所示。 图11

2.7K20

Excel实用工具16:创建一个简易自定义功能区加载

Excel在定制方面无疑是出类拔萃,我们可以根据工作实际需要在Excel创建自定义加载,让Excel更加满足我们独特需求,提高工作效率。...下面thespreadsheetguru.com创建一个自定义功能区加载模板,可以方便地稍作修改,满足定制需求。如下图1所示,我将其进行了汉化,这是初次打开加载工作簿界面。 ?...你可以在完美Excel微信公众号底部发送消息: 功能区定制 获取该加载工作簿进行研究。...你可以根据需要在代码窗口中修改上述6个过程代码,使自定义功能区满足自已需求。 在使该工作簿满足自已需要后,将该工作簿存储为加载(.xlam)文件。...这样,你就可以安装在自已Excel工作簿,或者分发给同事安装了。

1.8K30

Excel实战技巧50: 避免因粘贴破坏数据有效性

学习Excel技术,关注微信公众号: excelperfect Excel数据有效性(在Excel 2013及以上版本改称数据验证)很方便功能,帮助我们让用户在单元格输入规定数据。...我原来思路如果有数据有效性设置单元格,在用户粘贴数据前,我保存数据有效性设置,在用户粘贴后,使用工作表事件取消用户粘贴数据,同时恢复原来数据有效性设置。...CatchPaste", , False End Sub Private Sub Workbook_Open() CatchPaste End Sub 在工作簿打开时,进行相应设置。...在工作簿关闭或者非当前工作簿时,恢复相应设置。...再打开工作簿,试试效果,如下图1所示。 ? 图1 标准模块代码图片版如下: ? ? ? clsCommandBarCatcher类模块代码图片版: ?

6.7K31

探索VBA代码编辑器——《Excel VBA编程》系列讲座2

事实上,在工程资源管理器,你可以看到当前Excel已经打开所有工作簿及其对应工作表。如下图5所示。...图5 从中我们对Excel VBA中非常重要概念进行初步理解:工作簿一个可以引用对象,每个工作表也是一个可以引用对象。...但这些并不是Excel唯一对象,但简单地看一下工程资源管理器,它们就是这里显示对象。 代码窗口 在工程资源管理器,双击ThisWorkbook,打开该Workbook对象代码窗口。...图7 这是一个工作簿事件Workbook_Open,当你打开工作簿时会发生,你可以在其中输入你想在工作簿打开时执行操作代码。如果不添加任何代码,工作簿打开时不会执行任何操作。...图10 MsgBox能够给用户提供一条消息,本示例在用户在本工作簿中新建工作表时,会弹出一条消息“HelloWorld!”。

3.2K20

问与答57: 如何实现打开工作簿后自动跳转到当前日期所在列?

学习Excel技术,关注微信公众号: excelperfect Q:在Excel工作第1行每一列,都是按顺序排列日期,如何在打开工作簿时自动跳转到当前日期所在列?...如下图1所示,如果今天2019年4月6日,打开工作簿后自动选择这一列。 ? 图1 A:很简单。...在Workbook_Open过程输入下面的代码: Private Sub Workbook_Open() Dim wks As Worksheet Dim rngSearch As Range...).Resize(1, lngLastColumn) '查找当前日期所在单元格并激活该单元格 rngSearch.Find(Date).Activate End Sub 代码在工作簿打开时...,先确定工作表Sheet1第一行中所有已使用单元格区域,然后使用Find方法在该区域查找到当前日期,并激活当前日期所在单元格。

1.3K30

VBA专题10-8:使用VBA操控Excel界面之在功能区添加内置控件

创建新工作簿并保存为启用工作簿。 3. 关闭该工作簿,然后在CustomUI Editor打开工作簿。 4....单击工具栏Validation按钮来检查是否有错误。 7. 保存并关闭文件。 8. 在Excel打开工作簿文件。 下图展示在功能区“开始”选项卡出现了含两个内置控件名为Fav组。 ?...要在其他工作簿显示定制功能区,应将工作簿保存为加载(Excel加载(*.xlam)),并执行下列步骤在Excel启动时装载加载宏文件: 1....从“管理”下拉控件中选择“Excel加载”,单击“转到”。 3. 如果在可用加载列表没有你加载,单击“浏览”按钮查找到你保存该加载文件夹文件。 4....在可用加载列表中选中该加载复选框。 5. 单击“确定”安装加载如果要卸载该加载,简单地重复上述步骤并取消选中该加载复选框。

6K30
领券