VBS Excel插件的安装与卸载

2024-06-18 03:28
文章标签 excel 安装 卸载 插件 vbs

本文主要是介绍VBS Excel插件的安装与卸载,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!

可以通过下面的安装与卸载脚本,将xxxxxxxx.xlam AddIns(插件)安装或卸载。
注意,在安装或卸载前需要退出所有启动的Excel文件。
下面的代码复制粘贴到文本文件,替换好文件名称,另存为.vbs文件,并将xlam文件放到同一个文件夹,双击该vbs文件即可。

安装脚本如下
install.vbs

On Error Resume NextDim installPath 
Dim addInName 
Dim addInFileName 
Dim objExcel 
Dim objAddin'设定AddIns情报
addInName = "xxxxxxxx Addin" 
addInFileName = "xxxxxxxx.xlam"IF MsgBox("Do you want to install " &addInName & " ?", vbYesNo + vbQuestion, addInName) = vbNo Then WScript.Quit 
End IFSet objWshShell = CreateObject("WScript.Shell") 
Set objFileSys = CreateObject("Scripting.FileSystemObject")'创建安装路径
'(ex)C:\Users\[User]\AppData\Roaming\Microsoft\AddIns\[addInFileName] 
installPath = objWshShell.SpecialFolders("Appdata") & "\Microsoft\Addins\" & addInFileName'文件复制(覆盖)
objFileSys.CopyFile  addInFileName ,installPath , TrueSet objFileSys = Nothing'Excel 实例化
Set objExcel = CreateObject("Excel.Application") 
objExcel.Workbooks.Add'AddIns注册
Set objAddin = objExcel.AddIns.Add(installPath, True) 
objAddin.Installed = True'Excel 退出
objExcel.Quit
Set objAddin = Nothing 
Set objExcel = NothingIF Err.Number = 0 THEN MsgBox "The add-ins have been installed.", vbInformation, addInName 'objWshShell.Run "xxxxxxxx_readme.txt"
ELSE MsgBox "An error has occurred." & vbCrLF & "If Excel is running, exit it.", vbExclamation, addInName 
End IF
Set objWshShell = Nothing 


卸载脚本如下
uninstall.vbs

On Error Resume NextDim installPath 
Dim addInName 
Dim addInFileName 
Dim objExcel 
Dim objAddin'设定AddIns情报
addInName = "xxxxxxxx Addin" 
addInFileName = "xxxxxxxx.xlam"IF MsgBox("Do you want to uninstall " &addInName & " ?", vbYesNo + vbQuestion, addInName) = vbNo Then WScript.Quit 
End IF'Excel 实例化
Set objExcel = CreateObject("Excel.Application") 
objExcel.Workbooks.Add'AddIns解除注册
For i = 1 To objExcel.Addins.Count Set objAddin = objExcel.Addins.item(i) If objAddin.Name = addInFileName Then objAddin.Installed = False End If 
Next'Excel 退出
objExcel.QuitSet objAddin = Nothing 
Set objExcel = NothingSet objWshShell = CreateObject("WScript.Shell") 
Set objFileSys = CreateObject("Scripting.FileSystemObject")'创建卸载路径
'(ex)C:\Users\[User]\AppData\Roaming\Microsoft\AddIns\[addInFileName] 
installPath = objWshShell.SpecialFolders("Appdata") & "\Microsoft\Addins\" & addInFileName'删除文件
If objFileSys.FileExists(installPath) = True Then objFileSys.DeleteFile installPath , True 
Else MsgBox "Add-in file does not exist.", vbExclamation, addInName  
End If'删除注册表
objWshShell.RegDelete("HKCU\Software\VB and VBA Program Settings\xxxxxxxx\")Set objWshShell = Nothing 
Set objFileSys = NothingIF Err.Number = 0 THEN MsgBox "The add-ins have been uninstalled.", vbInformation, addInName 
ELSE MsgBox "An error has occurred." & vbCrLF & "If Excel is running, exit it.", vbExclamation, addInName 
End IF

这篇关于VBS Excel插件的安装与卸载的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!



http://www.chinasem.cn/article/1071179

相关文章

最详细安装 PostgreSQL方法及常见问题解决

《最详细安装PostgreSQL方法及常见问题解决》:本文主要介绍最详细安装PostgreSQL方法及常见问题解决,介绍了在Windows系统上安装PostgreSQL及Linux系统上安装Po... 目录一、在 Windows 系统上安装 PostgreSQL1. 下载 PostgreSQL 安装包2.

Maven如何手动安装依赖到本地仓库

《Maven如何手动安装依赖到本地仓库》:本文主要介绍Maven如何手动安装依赖到本地仓库问题,具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑完全的地方,望不吝赐教... 目录一、下载依赖二、安装 JAR 文件到本地仓库三、验证安装四、在项目中使用该依赖1、注意事项2、额外提示总结一、下载依赖登

C#实现将Excel表格转换为图片(JPG/ PNG)

《C#实现将Excel表格转换为图片(JPG/PNG)》Excel表格可能会因为不同设备或字体缺失等问题,导致格式错乱或数据显示异常,转换为图片后,能确保数据的排版等保持一致,下面我们看看如何使用C... 目录通过C# 转换Excel工作表到图片通过C# 转换指定单元格区域到图片知识扩展C# 将 Excel

如何在Mac上安装并配置JDK环境变量详细步骤

《如何在Mac上安装并配置JDK环境变量详细步骤》:本文主要介绍如何在Mac上安装并配置JDK环境变量详细步骤,包括下载JDK、安装JDK、配置环境变量、验证JDK配置以及可选地设置PowerSh... 目录步骤 1:下载JDK步骤 2:安装JDK步骤 3:配置环境变量1. 编辑~/.zshrc(对于zsh

如何将Python彻底卸载的三种方法

《如何将Python彻底卸载的三种方法》通常我们在一些软件的使用上有碰壁,第一反应就是卸载重装,所以有小伙伴就问我Python怎么卸载才能彻底卸载干净,今天这篇文章,小编就来教大家如何彻底卸载Pyth... 目录软件卸载①方法:②方法:③方法:清理相关文件夹软件卸载①方法:首先,在安装python时,下

如何在pycharm安装torch包

《如何在pycharm安装torch包》:本文主要介绍如何在pycharm安装torch包方式,具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑完全的地方,望不吝赐教... 目录在pycharm安装torch包适http://www.chinasem.cn配于我电脑的指令为适用的torch包为总结在p

在PyCharm中安装PyTorch、torchvision和OpenCV详解

《在PyCharm中安装PyTorch、torchvision和OpenCV详解》:本文主要介绍在PyCharm中安装PyTorch、torchvision和OpenCV方式,具有很好的参考价值,... 目录PyCharm安装PyTorch、torchvision和OpenCV安装python安装PyTor

Python Transformer 库安装配置及使用方法

《PythonTransformer库安装配置及使用方法》HuggingFaceTransformers是自然语言处理(NLP)领域最流行的开源库之一,支持基于Transformer架构的预训练模... 目录python 中的 Transformer 库及使用方法一、库的概述二、安装与配置三、基础使用:Pi

使用Python将JSON,XML和YAML数据写入Excel文件

《使用Python将JSON,XML和YAML数据写入Excel文件》JSON、XML和YAML作为主流结构化数据格式,因其层次化表达能力和跨平台兼容性,已成为系统间数据交换的通用载体,本文将介绍如何... 目录如何使用python写入数据到Excel工作表用Python导入jsON数据到Excel工作表用

如何解决mmcv无法安装或安装之后报错问题

《如何解决mmcv无法安装或安装之后报错问题》:本文主要介绍如何解决mmcv无法安装或安装之后报错问题,具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑完全的地方,望不吝赐教... 目录mmcv无法安装或安装之后报错问题1.当我们运行YOwww.chinasem.cnLO时遇到2.找到下图所示这里3.