VBscript运行shell命令脚本有效,但什么都不做
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了VBscript运行shell命令脚本有效,但什么都不做相关的知识,希望对你有一定的参考价值。
我试图通过单击.vbs文件编写代码来打开excel文件,但是虽然代码执行文件没有打开。当我在CMD中键入相同的命令时,文件打开完美。我究竟做错了什么?
Sub RunMacro()
CreateObject("WScript.Shell").Run("C:DesktopCompanyAlerts.xlsm")
End Sub
答案
您可以打开记事本并将以下内容保存为.vbs
Option Explicit
Sub Example()
Dim xlApp
Dim xlBook
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:DesktopCompanyAlerts.xlsm", 0, True)
xlApp.Application.Visible = True
'xlApp.Quit
' Set xlBook = Nothing
' Set xlApp = Nothing
End Sub
然后,您可以右键单击并运行,或从命令行调用此vbs。
以上是关于VBscript运行shell命令脚本有效,但什么都不做的主要内容,如果未能解决你的问题,请参考以下文章