VBA 更新自定义安装的加载宏文件版本

Sub 安装加载宏()Dim fnO, fnN, fpnN As String  'FileNameOld FileNameNew FilePathNameNewDim fnOA   'FileNameOldArrDim iA  'iArrIf MsgBox("本程序将安装自制选项卡 —— My_Tool。是否安装？", vbYesNo, "工具栏 My_Tool 安装") = vbNo Then ThisWorkbook.Close False'提示安装，若选择否，则关闭文件，不执行安装fnO = "My_Tool My_Tool_190710 MyTool_190819"                          '写入历史版本字符串fnOA = Application.Transpose(Application.Transpose(Split(fnO, " ")))  '生成历史版本数组fnN = "MyTool_190819"      '新的版本名称。On Error Resume NextApplication.DisplayAlerts = FalseFor Each iA In fnOA                                          '遍历历史版本Application.AddIns(iA).Installed = False                   '取消加载'Kill Workbooks(Application.UserLibraryPath & "\" & iA)    '删除文件Kill Application.UserLibraryPath & iA & ".xlam"             '删除文件Next iAfpnN = Application.UserLibraryPath & fnN      '新的加载宏文件保存路径ThisWorkbook.SaveAs fpnN, xlOpenXMLAddIn      '将文件另存为加载宏文件Application.AddIns(fnN).Installed = True      '将加载宏文件激活If Application.AddIns(fnN).Installed = True Then MsgBox "已成功安装工具 My_Tool！", , "提示"Application.DisplayAlerts = TrueThisWorkbook.Close  '关闭文件
End Sub

VBA 更新自定义安装的加载宏文件版本相关推荐

唯一插件化Replugin源码及原理深度剖析--插件的安装、加载原理
上一篇唯一插件化Replugin源码及原理深度剖析–唯一Hook点原理在Replugin的初始化过程中,我将他们分成了比较重要3个模块,整体框架的初始化.hook系统ClassLoader.插件的 ...
仿百度壁纸客户端（四）——自定义上拉加载实现精选壁纸墙
仿百度壁纸客户端(四)--自定义上拉加载实现精选壁纸墙百度壁纸系列仿百度壁纸客户端(一)--主框架搭建,自定义Tab + ViewPager + Fragment 仿百度壁纸客户端(二)--主页自 ...
记录--Vue自定义指令实现加载中效果v-load（不使用Vue.extend）
这里给大家分享我在网上总结出来的一些知识,希望对大家有所帮助网站效果演示:ashuai.work:8888/#/myLoad GitHub仓库地址代码:github.com/shuirongshu- ...
arcgis前端(2)-----＞基础篇--发布一个自定义地图及加载自定义地图/底图
arcgis前端(2)----->基础篇–发布一个自定义地图及加载自定义地图/底图文章目录 arcgis前端(2)----->基础篇--发布一个自定义地图及加载自定义地图/底图前言 & ...
vue自定义指令---处理加载图片失败时出现的碎图,onerror事件
目录一.自定义指令 1.局部注册和使用 2.全局注册和使用二.自定义指令处理图片加载失败(碎图) 一.自定义指令 vue中除v-model.v-show等内置指令之外,还允许注册自定义指令,获取D ...
android dialog 自定义布局,Android自定义Dialog实现加载对话框效果
前言最近开发中用到许多对话框,之前都是在外面的代码中创建AlertDialog并设置自定义布局实现常见的对话框,诸如更新提示等含有取消和删除两个按钮的对话框我们可以通过代码创建一个AlertDial ...
为此计算机上所有用户安装此加载项,win7打开特定网站提示“控件无法安装，windows已阻止此软件因为无法验证发行者”怎么办...
很多用户在运行win7操作系统的时候遇到一种情况,就是打开一些特定的网站或者使用某些网站的功能.比如用户打开工商银行网站时,就会弹出提示"控件无法安装,windows已阻止此软件因为无法验证 ...
自定义类加载器加载冲突类（一）-ClassLoader
使用场景:项目中遇到使用不同版本的类时候因为同路径同名类的冲突可以使用自定义类加载器进行加载规避这一问题相关代码如下: 代码 1. 类加载器: import java.io.File; import ...
android圆形点击效果,Android 三种方式实现自定义圆形页面加载中效果的进度条
[实例简介] Android 三种方式实现自定义圆形页面加载中效果的进度条 [实例截图] [核心代码] ad376a86-a9aa-49bc-8cea-321bcff2c0c3 └── AnimRou ...

VBA 更新自定义安装的加载宏文件版本

VBA 更新自定义安装的加载宏文件版本相关推荐

最新文章

热门文章