PptCiao, vorrei fare una domanda.
nw = Outline Box( wname,
V List Box(
Button Box( "Save All", sstat = saveall( 1, 330, 1, wname, sdir ) ),
Spacer Box( Size( 1, 5 ) ),
Tab Box( "Sat", V List Box( Button Box( "Save Tab" ), satplot( satp, grpname, grpname2, groupList ) ) )
)
);
dt << Select All Rows;
title = Outline Box( "Plots by Design" );
title << append( nw[1] << get picture );
For( l = 1, l <= N Items( nw ), l++,
title << append( nw[l] << get picture )
);
title << save presentation( "C:\Users\Desktop\Final.pptx", append );
Open( "C:\Users\Desktop\Final.pptx" );
L'output desiderato è un grafico per diapositiva, ma l'output è un'immagine lunga di tutti i grafici
Ri: PptSembra che tu non capisca la sezione nw = del tuo codice. All'interno della casella di contorno, ci sono oggetti che si intendono essere oggetti visibili, tuttavia, la casella di contorno non sarà visibile se non inserita in una nuova finestra () o in un diario.
Inoltre, fai riferimento a "satplot" ma quella funzione non è contenuta nel tuo codice.
Infine, fai riferimento a nw [l] nella tua immagine di acquisizione. Non sono sicuro, dato il tuo codice, che tu abbia mai più di un elemento nel tuo riferimento nw.
Ri: Ppt @ skyzvoir0001 ,
Piace @txnelson Jim, non sono sicuro di quello che stai cercando di fare. Supponendo che nw sia un elenco di oggetti di visualizzazione JMP, ecco uno script che potrebbe essere vicino a quello che vuoi fare. Nota: questo script salva la prima trama come file PPT. Quindi ogni trama successiva viene aggiunta alla presentazione PPT.
Il codice crea grafici aggiunti in una grande casella di contorno. JMP scrive su PPT una pagina per riquadro, quindi un grafico lungo.
Names Default to Here(1);
dt = Open("$Sample_Data/Fitness.jmp");
nw = Bivariate(
Y( :Runtime, :RunPulse, :MaxPulse ),
X( :Oxy ),
Group By( :Sex ),
Fit Line( {Report( 0 )} ),
SendToReport(
Dispatch(
{},
"Bivar Plot",
FrameBox,
{Row Legend(
:Sex,
Color( 1 ),
Color Theme( "SAS Default" ),
Marker( 0 ),
Marker Theme( "" ),
Continuous Scale( 0 ),
Reverse Scale( 0 ),
Excluded Rows( 0 )
)}
)
)
);
np = N Items(nw);
title = Outline Box( "Plots by Design - 1 of " || char(np) );
title << append( nw[1] << get picture );
title << save presentation( "C:\Users\gz\Desktop\Final.pptx" );
For( l = 2, l <= N Items( nw ), l++,
title = Outline Box( EvalInsert("Plots by Design - ^l^ of ^np^") );
title << append( nw[l] << get picture );
title << save presentation( "C:\Users\gz\Desktop\Final.pptx", append );
);
Open( "C:\Users\gz\Desktop\Final.pptx" );