ランチャート画像をスクリプトに自動的に保存する方法は?<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />皆さんこんにちは、
このスクリプトを作成して、テキスト ファイルを開き、データをフィルター処理してから、ラン チャートを生成しました。
選択したディレクトリにラン チャートを .gif/.jpeg ファイルとしてスクリプトに自動的に保存させることもできますか?
正確なスクリプトを以下に示します。 お手伝いありがとう！
開ける(
"R:\Operations\Engineering\FTP DATA\FT_LPC_Results.txt" 、
日にち=数値、
時間=数値、
多く ＃ =キャラクター、
部 ＃ =キャラクター、
みがきます ＃ =キャラクター、
駅 ＃ =数値、
LPC =数値、
列 8 =数値、
列 9 =数値、
列 10 =数値、
コラム11 =数値、
列 12 =数値、
コラム13 =数値、
コラム14 =数値、
コラム15 =数値、
16列目=数値、
コラム17 =キャラクター
) 、
行末( CRLF 、 CR 、 LF ) 、
フィールドの終わり(タブ、コンマ) 、
ストリップの引用( 1 ) 、
引用符としてアポストロフィを使用する( 0 ) 、
ファイル全体をスキャン( 1 ) 、
ラベル( 1 ) 、
列名の開始( 1 ) 、
データ開始( 2 ) 、
読むべき行(全て) 、
年ルール( 「10-90」 )
) ;
現在のデータ テーブル() <<データフィルター(
列( :部 ＃ ) 、
どこ( :部 ＃ == 「H2FEN-70-31NM-0317」 ) 、
画面( :部 ＃ 、サイズ( 204 、 259 ) 、リスト表示)
) ;
データ表( "FT_LPC_結果" ) <<サブセット(数式をコピー( 0 ) ) ;
サンプルラベル( :多く ＃ ) 、
サンプルサイズ( 1 ) 、
Kシグマ( 3 ) 、
チャート列( :名前( "LPC>0.1" ) 、ランチャート(中心線を表示( 0 ) ) ) 、
{} 、
「LPC>0.1のランチャート」 、
アウトラインボックス、
タイトルを設定( 「H2FEN-70-31NN-0317 - LPC」 )
) 、
{ 「LPC>0.1のランチャート」 } 、
「2」 、
スケールボックス、
{分( 39.2945275076211 ) 、マックス( 2195.92103353172 ) 、株式会社( 250 ) 、
基準線を追加( 2000年、個体、 { 255 、 0 、 0 } 、 「USL2000」 )}
) 、
{ 「LPC>0.1のランチャート」 } 、
「1」 、
スケールボックス、
{分( 15230.3237 ) 、マックス( 19677.7118706835 ) 、株式会社( 8 ) 、
回転ラベル( 1 )}
) 、
{ 「LPC>0.1のランチャート」 } 、
「ランチャート」 、
フレームボックス、
フレームサイズ( 897 、 415 )
) 、
{ 「LPC>0.1のランチャート」 } 、
「ランチャート」 、
フレームボックス( 2 ) 、
フレームサイズ( 69 、 415 )
) ;
Re: ランチャート画像をスクリプトに自動保存する方法は?このブログが役に立つかもしれません:
JMP レポートから Word または PowerPoint ファイルを自動的に更新する方法
これは、Microsoft ドキュメントを「開いて」画像を挿入するわけではありませんが、ほとんどそこに到達します。画像を挿入するには、挿入とリンク機能を使用して Excel ドキュメントを作成する必要があります。 したがって、ドキュメントを生成してファイルを挿入すると、その後、JSL は自動的に画像を生成し、リンクされた場所に保存できます。 次に Excel ドキュメントを開くと、更新されたリンク済みの画像が使用されます。
Re: ランチャート画像をスクリプトに自動保存する方法は?私はこれができることに気づいていません。JMP で管理図を実行し、キャプチャしたオブジェクトを取得して Excel に配置する Visual Basic プログラムを作成することもできます。
Re: ランチャート画像をスクリプトに自動保存する方法は?ジム、
スクリプトで Excel ドキュメントを自動的に開き、画像をドキュメントに挿入することは可能ですか。
これにより、毎回画像 (約 30 枚の画像) を挿入する必要がなくなります。 それは素晴らしいでしょう。
再度、感謝します
Re: ランチャート画像をスクリプトに自動保存する方法は?それは魅力のように働きました！ お手伝いいただきありがとうございます。
Re: ランチャート画像をスクリプトに自動保存する方法は?私のアプローチを検証するために、データ テーブルと同じ列を使用してデータ テーブルを作成し、2 つの変更を加えてデータ フィルター、サブセット、および管理図コードを実行しましたが、問題なく動作しました。これが私の2つの変更を加えたコードのコピーです。 2 つの変更点は、管理図プラットフォームの前に「cc=」を追加したことです。これを参照して管理図を保存できるようにしました。2 つ目の変更点は、スクリプトの末尾にある "report(cc) << save picture(..................)" です。その行は、出力 jpg を保存できるフォルダー パスを指すように変更する必要があります。スクリプトが作成した jpg ファイルを添付します。
開ける(
"R:\Operations\Engineering\FTP DATA\FT_LPC_Results.txt" 、
日にち=数値、
時間=数値、
多く ＃ =キャラクター、
部 ＃ =キャラクター、
みがきます ＃ =キャラクター、
駅 ＃ =数値、
LPC =数値、
列 8 =数値、
コラム9 =数値、
列 10 =数値、
コラム11 =数値、
列 12 =数値、
コラム13 =数値、
コラム14 =数値、
コラム15 =数値、
16列目=数値、
コラム17 =キャラクター
) 、
行末( CRLF 、 CR 、 LF ) 、
フィールドの終わり(タブ、コンマ) 、
ストリップの引用( 1 ) 、
引用符としてアポストロフィを使用する( 0 ) 、
ファイル全体をスキャン( 1 ) 、
ラベル( 1 ) 、
列名の開始( 1 ) 、
データ開始( 2 ) 、
読むべき行(全て) 、
年ルール( 「10-90」 )
) ;
現在のデータ テーブル() <<データフィルター(
フィルターを追加(
列( :部 ＃ ) 、
どこ( :部 ＃ == 「H2FEN-70-31NM-0317」 ) 、
画面( :部 ＃ 、サイズ( 204 、 259 ) 、リスト表示)
) ;
データ表( "FT_LPC_結果" ) <<サブセット(数式をコピー( 0 ) ) ;
cc =管理図(
サンプルラベル( :多く ＃ ) 、
サンプルサイズ( 1 ) 、
Kシグマ( 3 ) 、
チャート列( :名前( "LPC>0.1" ) 、ランチャート(中心線を表示( 0 ) ) ) 、
急送( {} 、 「LPC>0.1のランチャート」 、アウトラインボックス、タイトルを設定( 「H2FEN-70-31NN-0317 - LPC」 ) ) 、
{ 「LPC>0.1のランチャート」 } 、
「2」 、
スケールボックス、
{分( 100.2945275076211 ) 、マックス( 130.92103353172 ) 、株式会社( 250 ) 、
基準線を追加( 2000年、個体、 { 255 、 0 、 0 } 、 「USL2000」 )}
) 、
{ 「LPC>0.1のランチャート」 } 、
「1」 、
スケールボックス、
{分( 15230.3237 ) 、マックス( 19677.7118706835 ) 、株式会社( 8 ) 、回転ラベル( 1 )}
) 、
急送( { 「LPC>0.1のランチャート」 } 、 「ランチャート」 、フレームボックス、フレームサイズ( 897 、 415 ) ) 、
急送( { 「LPC>0.1のランチャート」 } 、 「ランチャート」 、フレームボックス( 2 ) 、フレームサイズ( 69 、 415 ) );
報告( cc ) <<画像を保存する( "<これを使いたいパスに変更>\thepicture.jpg" ) ;
Re: ランチャート画像をスクリプトに自動保存する方法は?こんにちはジム、
迅速な返信ありがとうございます。これは以下の完全なスクリプトであり、あなたが私にくれた Save Picture 機能を差し引いたものです。
私は JMP を初めて使用するので、ご容赦ください 
難しい方法でこれを行うこともできますが、スクリプトを実行したときにすべてが起こっていることのスクリーンショットを含めました。
画像の保存機能が機能しませんでした...お時間をいただきありがとうございます。
開ける（
"R:\Operations\Engineering\FTP DATA\FT_LPC_Results.txt",
列(
日付 = 数値、
時間 = 数値、
ロット番号 = キャラクター、
パーツ番号 = 文字、
ブラシ # = 文字、
ステーション # = 数値、
LPC = 数値、
列 8 = 数値、
列 9 = 数値、
列 10 = 数値、
列 11 = 数値、
列 12 = 数値、
列 13 = 数値、
列 14 = 数値、
列 15 = 数値、
列 16 = 数値、
列 17 = 文字
)、
インポート設定(
行末(CRLF、CR、LF)、
フィールドの終わり(タブ、コンマ)、
引用符を取り除く( 1 ),
アポストロフィを引用符 ( 0 ) として使用し、
ファイル全体をスキャン( 1 ),
ラベル( 1 ),
列名 Start( 1 ),
データ開始 ( 2 )、
読む行数( すべて ),
年のルール( "10-90" )
)
);
現在のデータ テーブル() << データ フィルター(
フィルタを追加(
列( :部品番号),
ここで ( :部品番号 == "H2FEN-70-31NM-0317" ),
表示( :品番、サイズ(204、259)、一覧表示)
)
);
Data Table( "FT_LPC_Results" ) << Subset( Copy formula( 0 ) );
管理図（
サンプルラベル( :ロット番号),
サンプルサイズ( 1 ),
KSigma( 3 ),
Chart Col( :Name( "LPC >0.1" ), Run Chart( Show Center Line( 0 ) ) ,
SendToReport(
急送（
{}、
"LPC>0.1のランチャート",
アウトラインボックス、
セットタイトル(「H2FEN-70-31NN-0317 - LPC」)
)、
急送（
{"LPC >0.1 のラン チャート"},
"2",
スケールボックス、
{最小(39.2945275076211)、最大(2195.92103353172)、インク(250)、
Add Ref Line( 2000, Solid, {255, 0, 0}, "USL 2000" )}
)、
急送（
{"LPC >0.1 のラン チャート"},
"1",
スケールボックス、
{最小(15230.3237)、最大(19677.7118706835)、インク(8)、
回転ラベル( 1 )}
)、
急送（
{"LPC >0.1 のラン チャート"},
"ランチャート",
フレームボックス、
フレームサイズ( 897, 415 )
)、
急送（
{"LPC >0.1 のラン チャート"},
"ランチャート",
フレームボックス( 2 )、
フレームサイズ( 69, 415 )
)
)
)
Re: ランチャート画像をスクリプトに自動保存する方法は?ディスカッションの質問にコピーしたスクリプトは、正しく貼り付けられませんでした。したがって、それは不完全です。ただし、実行後に出力を jpg ファイルとして保存する簡単なラン チャートの例を次に示します。
名前のデフォルトはここ( 1 ) ;
dt =開いた( 「$SAMPLE_DATA/big class.jmp」 ) ;
cc =管理図、
サンプルサイズ( 5 ) 、
Kシグマ( 3 ) 、
チャート列( :身長、ランチャート(中心線を表示( 0 ) ) )
) ;
報告( cc ) <<画像を保存する( "<パスに入れる> \thepicture.jpg" ) ;
