Ciao,
Sto cercando di creare uno script per generare un output e salvare un powerpoint (o meno) in base alla selezione dell'utente. Non riesco a far funzionare il comando "salva presentazione" quando è annidato all'interno della struttura H List Box.
Il primo script funziona bene:
Names Default To Here( 1 );
dt1 = open(Pick File("Select the the DATA TABLE to open.")); //open a file
WinHandle2 = new Window("Graphs",Distribution(Column(2))); //generate some output of interest
product_name = dt1:Product[1]; //get the product name from the first cell in the data table
//OUTPUT report to a Powerpoint file (THIS WORKS FINE):
saveFilename=product_name ||"_Distribution_"||char(year(today())) ||"-"||char(month(today()))||".pptx";
WinHandle2 << Save Presentation(saveFilename, Outline Titles("TopLeft")); //save the output to a Powerpoint file.
//prompt user to see if they want to save and close remaining windows.
w1 = New Window("What's Next?", text box("
Save the report and Close the Data Table?
"),
// Get user input,
H List Box(Button Box("Yes",
WinHandle2<<CLOSE window=""></CLOSE>Se sposto il comando "Salva presentazione" all'interno della casella di riepilogo H, viene visualizzato un messaggio di errore "Errore durante la scrittura del file di presentazione. Impossibile aprire in modalità ReadWrite. Il sistema non trova il file specificato". Vedi il codice non funzionante di seguito:
Names Default To Here( 1 );
dt1 = open(Pick File("Select the the DATA TABLE to open.")); //open a file
WinHandle2 = new Window("Graphs",Distribution(Column(2))); //generate some output of interest
product_name = dt1:Product[1]; //get the product name from the first cell in the data table
//prompt user to see if they want to save and close remaining windows.
w1 = New Window("What's Next?", text box("
Save the report and Close the Data Table?
"),
// Get user input,
H List Box(Button Box("Yes",
//OUTPUT report to a Powerpoint file (THIS WORKS FINE):
saveFilename=product_name ||"_Distribution_"||char(year(today())) ||"-"||char(month(today()))||".pptx";
WinHandle2 << Save Presentation(saveFilename, Outline Titles("TopLeft")); //save the output to a Powerpoint file.
WinHandle2<<CLOSE window=""></CLOSE>Fondamentalmente, voglio che l'utente scelga se la presentazione debba essere salvata, o semplicemente uscire. Grazie in anticipo per il vostro aiuto
Ecco un modo per farlo:
Names Default To Here( 1 );
dt1 = Open( path = Pick File( "Select the the DATA TABLE to open." ) );
pathToFolder = Left( path, Contains( path, Word( -1, path, "\/" ) ) - 1 );
Grazie per la risposta. È strano che il primo set di codice (in cui la presentazione di salvataggio si trova al di fuori della casella di riepilogo H) funzioni correttamente.
Nel codice superiore, il file salva nell'ultima directory attiva. (la posizione da dove viene eseguito lo script e il file di dati di input si trova). Come posso farlo con la versione H List Box del codice?
Il problema è che il percorso / il nome del file che si sta passando alla Presentazione di salvataggio punta a una cartella che non esiste o non ha prefissi di scrittura. Ho ricevuto lo stesso messaggio durante l'esecuzione del codice, quindi ho aggiunto il valore product_name, un percorso a una directory scrivibile e quindi il codice ha funzionato correttamente.
