excel - minitab グラフとプロットの保存エラー: 「...コレクションは空で、有効な出力オブジェクトが含まれていません」

Question

minitab で GageR&R 調査を自動化したいと考えています。

コードが見つかりましたが、行はmtbProject.Commands.Item(1).Outputs.Item(1).Graph.SaveAs.

与える

実行時エラー:「IOutput: IOutput コレクションが空で、有効な出力オブジェクトが含まれていません」

Sub msa_macro()
    '
    ' msa_macro Macro
    '
    '
    Dim MtbApp As Mtb.Application
    Dim mtbProject As Mtb.Project
    Dim mtbWorksheet As Mtb.Worksheet
    
    Set MtbApp = New Mtb.Application
    Set mtbProject = MtbApp.ActiveProject
    Set mtbWorksheet = mtbProject.ActiveWorksheet
    
    MtbApp.UserInterface.Visible = True
    MtbApp.UserInterface.DisplayAlerts = True
    
    mtbProject.ExecuteCommand "Execute 'C:\Amir\DataAnalysis2\MSA_FixtureMill_STC049\MSA_STC049_BSM\Results_Files\readfileMinitab_test.mtb' 1."
    
    mtbProject.Commands.Item(1).Outputs.Item(1).Graph.SaveAs "C:\Result_Files\grph1.png", True, GFJPEG  
    
End Sub

Answer 1

ありがとうフロリアン。はい、そうです、間違ったコマンドの出力を読み取ろうとしていることがわかりました。

「Gage R&R」コマンドのシーケンスを実行し、出力グラフを保存したいと考えていました。これで完成です。役立つ回答をありがとうございます。