在Excel中执行嵌入式.exe对象
在Excel中执行嵌入式.exe对象
提问于 2014-09-23 12:53:26
我已将一个对象插入到Excel中。此对象是exe (控制台应用程序)。
我可以通过双击它来调用应用程序。但是，我需要使用参数(即正在调用的文档的文件路径)来调用它。如何使用参数调用这个exe？
回答 2
Stack Overflow用户
回答已采纳
发布于 2014-09-23 22:01:14
如果使用以下步骤将.exe导入到Excel中：
- 插入对象
- 选择选项卡:从文件创建
- 浏览exe文件
- 检查“显示为图标”
然后您可以编写VBA子程序/宏类(我使用矩形形状的对象来执行宏，单击它)：
Sub RoundedRectangle1_Click()
Dim ws As Worksheet
Dim oo As OLEObject
Set ws = Sheets("Sheet1")
Set oo = ws.OLEObjects("Object 1")
oo.Verb xlVerbPrimary
End SubStack Overflow用户
发布于 2015-03-16 21:08:27
OP要求提供一种包含参数的方法，这在公认的解决方案中似乎是不可能的。我用不同的方式实现了这一点。此代码将文件提取到工作簿的目录，然后执行它。
Sub saveAndRunFileExample()
ActiveSheet.OLEObjects(1).Copy
CreateObject("Shell.Application").Namespace(ActiveWorkbook.Path).Self.InvokeVerb "Paste"
Call Shell(ActiveWorkbook.Path & "\example.exe --parameter", vbNormalFocus)
End Sub页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/25995630
复制相关文章
相似问题
腾讯云开发者
