从宏

Question

我是工程学习最后一年的学生，我的项目是建立一个竞技场模型。在最后一步中，我想从excel激活竞技场。

我在excel中创建了一个宏

Sub ARENA_EXECUTE()
    m = Shell("""program_path"" ""model_path""", vbMaximizedFocus)
End Sub

我在模型中创建了一个vba代码

Sub ModelLogic_DocumentOpen()
    Dim m As Model
    Set m = ThisDocument.Model
    m.Go
End Sub

我可以打开模型，但在第一次复制时出现问题并显示此消息：

  

警告：在模拟时0.0时生成警告   评估REPLICATE表达式。您试图使用   进程间通信（IPC），但IPC没有成功   初始化。您必须包含VBA或用户代码才能启用此功能。   请参阅高级中的实时功能和用户编码的C / C ++主题   竞技场的选项部分有助于获取更多信息。任何消息   要发送的内容将回显到屏幕上。 17131：IPCINI

你能帮我解决这个问题。

Answer 1

是否可以添加更多详细信息。如果您正在使用shell编程。

例如，下面的程序会打开一个文件夹 'Shell“explorer.exe”，vbNormalFocus