Excel VBA 自动化 JMP大家好，我正在尝试从 excel VBA 运行 JMP 时间序列分析。
下面是代码
子 LData()
将 myjmp 调暗为 JMP.Application
将 jmp_doc 调暗为 JMP.Document
将 jmp_BL 调暗为 JMP.DataTable
将 jmp_dt 调暗为 JMP.DataTable
将 jmp_dtFinal 调暗为 JMP.DataTable
将 jmpstr 调暗为字符串
设置 myjmp = CreateObject("JMP.Application")
myjmp.Visible = True
设置 jmp_doc = myjmp.OpenDocument("C:\Data_Doc1.xlsx")
设置 jmp_BL = jmp_doc.GetDataTable
将 TS 调暗为 JMP.TimeSeries
设置 TS = jmp_doc.CreateTimeSeries()
Dim Cont As JMP.timeSeriesConstraintConstants
冬天 = tsConstraintZeroToOne
将 Modd 调暗为 JMP.timeSeriesModelConstants
Modd = tsModelWinters
TS.LaunchAddYSeries（“卖出”）
TS.LaunchAddNumAutoCorrLags (25)
TS.启动
调用 TS.SmoothingModel(Modd, Winters)
结束子
它在 JMP 中给了我一条错误消息
未知操作
季节性模型需要数字参数：每个季节的周期
当我做 Call.TS.SmoothingModel(Modd,Winters) 时，我没有选择输入每个季节的时间段
需要你的帮助来启发我我所缺少的
提前非常感谢。
干杯。
肯尼
回复：Excel VBA 自动化 JMP没问题，非常感谢您的帮助。
回复：Excel VBA 自动化 JMP不幸的是，平滑模型的自动化方法似乎与时间序列中的选项过时了。 我将联系技术支持，让他们知道应该输入问题以在产品的未来版本中更正此问题。 对于这种情况，我知道的唯一解决方法是使用自动化“RunCommand”方法将 JSL 直接提交给 JMP 进行分析。 因此，您可以执行以下操作（使用示例数据“Raleigh Temps”）
将 DocX 调暗为 JMP.Document
DocX = myJMP.OpenDocument("c:\program files\sas\jmppro\14\samples\data\Time Series\Raleigh Temps.jmp")
myJMP.RunCommand（“时间序列（X（：月数），Y（：温度），温特斯方法（48，零到一，预测间隔（0.8）））”）
回复：Excel VBA 自动化 JMP时间序列（
Y（：卖出），
预测期数（12），
Winters 方法（48，零到一，置信区间（0.8）），
发送到报告（
派遣（
{"模型比较"},
"2",
比例框，
{添加参考线（0，虚线，“黑色”）}
),
派遣（
{"模型比较"},
"8",
比例框，
{添加参考线（0，虚线，“黑色”）}
),
派遣（
{"模型比较"},
"3",
比例框，
{添加参考线（70，实心，“蓝色”），显示主要网格（1）}
),
派遣（
{"模型比较"},
"4",
比例框，
{添加参考线（0，虚线，“黑色”）}
),
派遣（
{"模型比较"},
"5",
比例框，
{添加参考线（0，虚线，“黑色”）}
)
)
);
非常感谢您的帮助
回复：Excel VBA 自动化 JMP您能否使用 JMP 的时间序列对话框生成所需的分析？ 如果是这样，您能否在此处发布成功分析的脚本（报告 Red Triangle->Save Script->To Script Window）。
谢谢，
布莱恩·科科伦
JMP开发
