Excel VBA - IR控製圖使用的LaunchSet方法<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />再次問好。我查看了“分析”VB.NET示例:
C:\ Program Files \ SAS \ JMP \ 11 \ Samples \ Automation \ Visual Basic Samples \ Analysis .NET \ analysis.vb
然後,從ControlChart_Click()過程中,我提取了與IR圖表相關的代碼(見下文)。
代碼運行成功...除了我添加的2行代碼:
ccontrol2.LaunchSetIRChartParms(True,False,2)
ccontrol2.LaunchSetKSigmaAlphaH(True,False,False,3.0,1.0)
請告知正確的語法。謝謝!
“------------------------------------------------- ---------
'分析>控製圖> IR>個人測量
“------------------------------------------------- ---------
Sub ControlChart()
昏暗的應用程序作為JMP.Application
Dim doc As JMP.Document
Dim dt作為JMP.DataTable
Dim ccontrol2作為JMP.ControlChart
'啟動JMP
設置app = CreateObject(“JMP.Application”)
app.Visible = True
'訪問文檔並檢索指向底層數據表的指針。
設置doc = app.OpenDocument(“C:\ Program Files \ SAS \ JMP \ 11 \ Samples \ Data \ Big Class.jmp”)
設置dt = doc.GetDataTable
'將數據錶帶到前台並使其成為活動表。
dt.Activate
'創建一種特定類型的分析對象(例如,ControlChart),
'用於指定列然後啟動分析。
設置ccontrol2 = doc.CreateControlChart
'選擇垂直軸上的圖表列。
ccontrol2.LaunchAddProcess(“height”)
'選擇其值標記水平軸的列。
ccontrol2.LaunchAddSampleLabel(“年齡”)
'選擇按組處理的列。
ccontrol2.LaunchAddBy(“性”)
'從jmpControlChartConstants中選擇您想要的圖表類型(例如,IR)。
ccontrol2.LaunchSetChartType((JMP.jmpControlChartConstants.jmpControlChartIR))
'對於IR圖表,設置Individual Measurement選項和KSigma參數。
ccontrol2.LaunchSetIRChartParms(True,False,2)
ccontrol2.LaunchSetKSigmaAlphaH(True,False,False,3.0,1.0)
'使用之前通過LaunchAdd___指定的列運行分析。
ccontrol2.Launch
結束子
Re:Excel VBA - IR控製圖使用的LaunchSet方法謝謝,Brian。您對我的代碼的測試有助於我指出正確的方向。
我讀到了調用子例程的語法:
- 如果使用關鍵字“Call”,則必須將參數列表括在括號中。
- 如果省略關鍵字“調用”,則還必須省略參數列表周圍的括號。
所以有兩種正確的方法可以在VB中編寫代碼:
調用ccontrol2.LaunchSetIRChartParms(True,False,2)
調用ccontrol2.LaunchSetKSigmaAlphaH(True,False,False,3#,1#)
和
ccontrol2.LaunchSetIRChartParms True,False,2
ccontrol2.LaunchSetKSigmaAlphaH True,False,False,3#,1#
Re:Excel VBA - IR控製圖使用的LaunchSet方法嗨JB,
我無法幫助你。 你上面提到的方法對我來說沒問題。 你得到什麼樣的錯誤?
Brian Corcoran
JMP