459192_zh-TW

liliconcom

如何將控制圖及其摘要儲存到ppt中的同一張投影片中

你好，

我有一個腳本，它創建具有基於參數的功能的控製圖塊，我想將每個參數的每個報告保存到單獨的 ppt 幻燈片中。 任何幫助表示讚賞。

以下是圖表：

我想要每個參數圖表和報告在單獨的 ppt 幻燈片上：

 

附件是帶有控製圖腳本的表格。

 

謝謝，

湯瑪斯

 

附言。如果可以只保存 Ppk 低於 1.33 的圖表，那就太棒了:)

內容組織大規模客製化品質和工藝工程回覆：如何將控制圖及其摘要儲存到 ppt 中的同一張投影片中

嗨吉姆，

 

這正是我所需要的，非常感謝。

 

湯瑪斯

回覆：如何將控制圖及其摘要儲存到 ppt 中的同一張投影片中

將以下 JSL 添加到腳本底部，您應該會得到您想要的結果

nw = New Window( "Control Charts", 
 V List Box(
  obAge = Outline Box( "Control Chart for Age" ),
  obWeight = Outline Box( "Control Chart for Weight" ),
  obOxy = Outline Box( "Control Chart for Oxy" )
 )
);

ob = Outline Box( "", hlb = H List Box() );
hlb << append( Report( gb )["Levey Jennings of Age"] );
ob2 = Outline Box( "Distributions" );
ob2 << append( Report( gb )["Age"] );
hlb << append( ob2 );
obAge << append( ob << get picture );

ob = Outline Box( "", hlb = H List Box() );
hlb << append( Report( gb )["Levey Jennings of Weight"] );
ob2 = Outline Box( "Distributions" );
ob2 << append( Report( gb )["Weight"] );
hlb << append( ob2 );
obWeight << append( ob << get picture );

ob = Outline Box( "", hlb = H List Box() );
hlb << append( Report( gb )["Levey Jennings of Oxy"] );
ob2 = Outline Box( "Distributions" );
ob2 << append( Report( gb )["Oxy"] );
hlb << append( ob2 );
obOxy << append( ob << get picture );

nw << Save Presentation( "$TEMP/jmp_example2.pptx" );
Open( "$TEMP/jmp_example2.pptx" );

nw << close window;

回覆：如何將控制圖及其摘要儲存到 ppt 中的同一張投影片中

嗨吉姆，

這看起來非常好並且做得很好，但是有沒有辦法做類似的工作但保持原始控製圖腳本的完整性不變？

我正在從所有圖表中提取功能，因此我需要將它們放在一個區塊中。

我確實湖了你提到的方法如何使用 JSL 將日誌儲存為 PPT（每張投影片 2 個圖表） ，有沒有辦法修改該腳本以與控製圖腳本一起使用？

 

謝謝，

湯瑪斯

回覆：如何將控制圖及其摘要儲存到 ppt 中的同一張投影片中

這個問題之前已經被問過。這是我處理該問題的方式的鏈接

如何使用 JSL 將日誌儲存為 PPT（每張投影片 2 個圖表）

 

這是一個完整的範例，使用您的數據創建您想要的輸出

Names Default To Here( 1 );
nw = New Window( "Control Charts",
 ob1 = Outline Box( "Levey Jennings of Age" ),
 ob2 = Outline Box( "Levey Jennings of Weight" ),
 ob3 = Outline Box( "Levey Jennings of Oxy" )
);
cc1 = Control Chart(
 invisible,
 Sample Label( :Name ),
 KSigma( 3 ),
 Chart Col(
  :Age,
  Levey Jennings(
   Show Zones( 1 ),
   Shade Zones( 1 ),
   Test 1( 1 ),
   Test 2( 1 ),
   Test 5( 1 ),
   Test 6( 1 ),
   Test Beyond Limits( 1 )
  ),
  Capability(
   Distribution(
    Continuous Distribution(
     Column( :Age ),
     Quantiles( 0 ),
     Horizontal Layout( 1 ),
     Vertical( 0 ),
     Outlier Box Plot( 0 ),
     Normal Quantile Plot( 1 ),
     Process Capability(
      Use Column Property Specs,
      Process Capability Analysis(
       Nonconformance( 0 ),
       Histogram( 1, Show Within Sigma Density( 0 ) )
      )
     ),
     Customize Summary Statistics( Skewness( 1 ) )
    )
   )
  )
 )
);
cc2 = Control Chart(
 invisible,
 Sample Label( :Name ),
 KSigma( 3 ),
 Chart Col(
  :Weight,
  Levey Jennings(
   Show Zones( 1 ),
   Shade Zones( 1 ),
   Test 1( 1 ),
   Test 2( 1 ),
   Test 5( 1 ),
   Test 6( 1 ),
   Test Beyond Limits( 1 )
  ),
  Capability(
   Distribution(
    Continuous Distribution(
     Column( :Weight ),
     Quantiles( 0 ),
     Horizontal Layout( 1 ),
     Vertical( 0 ),
     Outlier Box Plot( 0 ),
     Normal Quantile Plot( 1 ),
     Process Capability(
      Use Column Property Specs,
      Process Capability Analysis(
       Nonconformance( 0 ),
       Histogram( 1, Show Within Sigma Density( 0 ) )
      )
     ),
     Customize Summary Statistics( Skewness( 1 ) )
    )
   )
  )
 )
);
cc3 = Control Chart(
 invisible,
 Sample Label( :Name ),
 KSigma( 3 ),
 Chart Col(
  :Oxy,
  Levey Jennings(
   Show Zones( 1 ),
   Shade Zones( 1 ),
   Test 1( 1 ),
   Test 2( 1 ),
   Test 5( 1 ),
   Test 6( 1 ),
   Test Beyond Limits( 1 )
  ),
  Capability(
   Distribution(
    Continuous Distribution(
     Column( :Oxy ),
     Quantiles( 0 ),
     Horizontal Layout( 1 ),
     Vertical( 0 ),
     Outlier Box Plot( 0 ),
     Normal Quantile Plot( 1 ),
     Process Capability(
      Use Column Property Specs,
      Process Capability Analysis(
       Nonconformance( 0 ),
       Histogram( 1, Show Within Sigma Density( 0 ) )
      )
     ),
     Customize Summary Statistics( Skewness( 1 ) )
    )
   )
  )
 )
);
ob1 << append( cc1 << get picture );
ob2 << append( cc2 << get picture );
ob3 << append( cc3 << get picture );

nw << Save Presentation( "$TEMP/jmp_example.pptx" );
Open( "$TEMP/jmp_example.pptx" );