您可以创建一个仅包含图形的对象，然后将“保存演示”消息发送到该对象。 尝试用这个替换你的最后一行：
wbd1Plot = Report( wbd1 )["Compare Distribution", ListBox(4)];
wbd1Plot << Save Presentation( "C:/Users/WbChart.pptx" );
要找到引用绘图的正确索引，您可以使用 View > Show Properties，然后突出显示绘图本身。 在 Box Path 部分下，您会找到要使用的正确索引：["Compare Distribution", ListBox(4)]。
罗斯：
非常感谢您的意见。 我按照 JMP 16 的说明查看了树结构。 威布尔分布在 ListBox(5) 下。 我在您提供的代码中尝试过，但生成的 ppt 已创建但没有内容。 我返回树结构，发现 ListBox(5) 下的图表本身被命名为 LayoutAtomBox(1)。 所以我尝试用它代替 ListBox(5) 并且它有效。 只有Weibull Dist图被发送到ppt。 我不知道为什么 ListBox(5) 不起作用，但我会继续这样做。 再次非常感谢您的解决方案。
请允许我修改该答案：属性窗格中的框路径部分在去年秋天刚刚发布的 JMP 17 中可用。 要在 JMP 16 及更早版本中为绘图找到正确的索引，您需要右键单击“比较分布”部分标题旁边的灰色显示图标，然后选择“编辑”>“显示树结构”。
我正在使用下面的脚本通过 Life Distribution 门户生成威布尔分布图，然后将其发送到 Powerpoint。 此外，我正在将 Weibull 参数估计数据制作成一个数据表，其中包括 Weibull Alpha 和 Beta。
问题是与威布尔图一起，其他几个图和表格也被发送到 ppt，大约有三十张幻灯片的图表和图像。
有没有办法只带威布尔分布图？
//威布尔分布图
wbd1 = ss2DT << 生命分布(
透视（比较组），
Y(:VALUEABS),
分组（：GRP），
置信区间法（Wald），
选择分布( Distribution, Weibull ),
选择规模（威布尔），
选项卡式报告 ( 0 ),
发送报告(
派遣（
{“生活分布 - 比较组”，“比较分布”}，
"1",
比例尺,
{Format( "Fixed Dec", 12, 2 ), Min( 1.5 ), Max( 6 ), Inc( 0.3 ),
小滴答声( 1 )}
),
派遣（
{“生活分布 - 比较组”，“比较分布”}，
"2",
比例尺,
{最小值（0.000002502137722793），最大值（0.999941236419419），
添加参考线（0.632，“虚线”，“黑色”，“”，1）}
),
派遣（
{“生活分布 - 比较组”，“比较分布”}，
“生命分布比较组”，
框框,
{标记大小( 2 )}
),
派遣（
{“生活分布 - 比较组”，“比较分布”}，
“值”，
文本编辑框，
{设置文本（“Parm 1”）}
)
)
);
//生成Weibell参数化数据表
wbdt1 = Report( wbd1 )[Outline Box( "Life Distribution - Compare Groups" )][
大纲框（“统计”）][大纲框（“参数估计”）][
Outline Box( "参数估计 - Weibull" )][Table Box( 1 )] <<
制作数据表（“Parm 1 Wb”）；
wbdt1 << 保存( "C:/Users/Wdt1.jmp" );
//保存威布尔分布到ppt
等待（2）；
显示属性（wbd1）；
wbd1 << 保存演示文稿( "C:/Users/WbChart.pptx" );
