Minitab 使用 Excel 宏自动关闭

Question

我想运行宏来对单独存储的 excel 文件执行功能。我创建了一个 minitab 宏文件并将其保存为 .MAC 格式。当我运行excel宏代码打开minitab代码时，它运行mac代码并自动关闭

    Sub GetModel()

    Dim MtbApp As Object

    ActiveWindow.WindowState = xlMinimized
    Set MtbApp = CreateObject("Mtb.Application")
    

    
    MtbApp.Open "C:\Users\gvadivel\Desktop\Gowtham\Project_3_Capability Study\minitabfile\Minitab.MPJ"
           
    MtbApp.ActiveProject.ExecuteCommand "%test2"


    End Sub

Answer 1

Sub GetModel()

Dim MtbApp As Object

ActiveWindow.WindowState = xlMinimized
Set MtbApp = CreateObject("Mtb.Application")



MtbApp.Open "C:\Users\gvadivel\Desktop\Gowtham\Project_3_Capability Study\minitabfile\Minitab.MPJ"

Set mtbUI = MtbApp.UserInterface
    mtbUI.Visible = True
    mtbUI.Interactive = True
    mtbUI.UserControl = True
    mtbUI.DisplayAlerts = True

MtbApp.ActiveProject.ExecuteCommand "%test2"

End Sub