Re: Script pour enregistrer le rapport actuel en tant que .ppt, déclenché par un clic de boutonLe message << SavePresentation () est valide pour les objets de la boîte d'affichage, vous aurez donc besoin de quelque chose comme ceci pour obtenir le rapport de la plate-forme que vous avez créée:
(obj << Report) << Save Presentation( "$DOCUMENTS/report.pptx" )
Vous pouvez également utiliser Current Report (), mais cela peut poser problème si vous faites autre chose après la création du rapport et avant l'exportation du Powerpoint. Il en va de même pour la création de votre rapport - c'est probablement une bonne idée d'utiliser:
obj = dt << Gaussian Process(...)
Le "dt" vous aidera à vous assurer que la table correcte est utilisée et vous pouvez ajouter Noms par défaut ici (1) en haut pour vous assurer que ces variables JSL que vous créez ne seront pas en conflit avec d'autres.
Re: Script pour enregistrer le rapport actuel en tant que .ppt, déclenché par un clic de boutonBonjour, merci beaucoup pour la clarté. J'ai implémenté les modifications que vous avez suggérées mais je n'arrive pas à obtenir le clic du bouton pour lancer l'enregistrement du rapport au format .pptx. Le clic du bouton apparaît pour se charger pendant une microseconde, mais rien n’est enregistré sur le bureau.
// "//!" placed at the first line of script results in auto-run rather than to open the script
// //!
Names Default To Here(1);
//opens a new window
w = New Window( "Load Your Data Table",
Text Box( "Choose an Excel file in which your data is linearized into
columns and transformed into Log10[x]." ),
//button to load data
Button Box( "1. Load data table", dt = Open( ) ),
//button to set column type
Button Box( "2. Set column type to Numeric/Continuous", dt = current data table();
for (i = 1, i <= ncols(dt), i++, column(dt, i) << data type(numeric);
column(dt, i) << set modeling type(continuous))),
//button to initiate Gaussian modeling
Button Box( "3. Gaussian modeling", obj = dt << Gaussian Process(Estimate Nugget(1),
Set Correlation Function("Cubic"), Profiler(1),
SendToReport( Dispatch( {}, "Model Report", OutlineBox, {Close( 1 )})),
//automatically saves the Gaussian analysis as a script to the data table
<< Save Script to Data Table(
"Gaussian modeling",
<<PROMPT></PROMPT>
Script pour enregistrer le rapport actuel au format .ppt, déclenché par un clic de bouton* J'ai trouvé quelques messages très similaires qui ont été résolus dans le passé, mais je n'ai pas réussi à utiliser les solutions .... désolé pour cela étant un message en double.
J'essaie d'ajouter un script déclenché par un clic de bouton qui peut enregistrer le rapport actuellement ouvert généré à partir de la modélisation de processus gaussienne en tant que fichier .pptx. J'ai trouvé un exemple pertinent de << enregistrer la présentation (... ) dans l’index de script mais n’ont pas été en mesure de le placer comme argument fonctionnel de la boîte de boutons ("test", [ici]).
Voici mon script jusqu'à présent:
// "//!" placed at the first line of script results in auto-run rather than to open the script
// //!
//opens a new window
w = New Window( "Load Your Data Table",
Text Box( "Choose an Excel file in which your data is linearized into
columns and transformed into Log10[x]." ),
//button to load data
Button Box( "1. Load data table", dt = Open( ) ),
//button to set column type
Button Box( "2. Set column type to Numeric/Continuous", dt = current data table();
for (i = 1, i <= ncols(dt), i++, column(dt, i) << data type(numeric);
column(dt, i) << set modeling type(continuous))),
//button to initiate Gaussian modeling
Button Box( "3. Gaussian modeling", obj = Gaussian Process(Estimate Nugget(1),
Set Correlation Function("Cubic"), Profiler(1),
SendToReport( Dispatch( {}, "Model Report", OutlineBox, {Close( 1 )})),
//automatically saves the Gaussian analysis as a script to the data table
<< Save Script to Data Table(
"Gaussian modeling",
<<PROMPT></PROMPT>
