85262_it-IT

liliconcom

Come aprire le tabelle di dati private in loop

Tutti,
Ho un problema abbastanza semplice. È a mia conoscenza che quando apri la tabella dei dati come privata, perdi la tabella quando non conservi il riferimento del nome della tabella di dati. Quindi, come si mantengono le tabelle di dati soprattutto quando le si apre come parte di un ciclo. Ad esempio: 

 

FilePath = "C:\Test.xlsx"; 

SheetsList = Get Excel Worksheets(FilePath); 
OpenDts = {}; 

for(i = 1, i <= N Items(SheetsList), i++,
  dt = Open(FilePath,
     "Private",
     Worksheets(SheetsList[i]),
     Use for all sheets( 0 ),
     Concatenate Worksheets( 0 ),
     Create Concatenation Column( 0 ),
     Worksheet Settings(1,
          Has Column Headers( 1 ),
          Number of Rows in Headers( 1 ),
          Headers Start on Row( 1 ),
          Data Starts on Row( 2 ),
          Data Starts on Column( 1 ),
          Data Ends on Row( 0 ),
          Data Ends on Column( 0 ),
          Replicated Spanned Rows( 1 ),
          Replicated Spanned Headers( 0 ),
          Suppress Hidden Rows( 1 ),
          Suppress Hidden Columns( 1 ),
          Suppress Empty Columns( 1 ),
          Treat as Hierarchy( 0 ),
          Multiple Series Stack( 0 ),
          Import Cell Colors( 0 ),
          Limit Column Detect( 0 ),
          Column Separator String( "-" )
           )
     );
  Insert Into(OpenDts,"Data Table(" || SheetsList[i] || ")"); 
   );
Show(SheetsList); 
Show(OpenDts); 
<BR />// This fails 
for(i = 1, i <= N Items(OpenDts), i++, 
  OpenDts[i] << Show Window(1); 
   ); 

Ri: Come aprire le tabelle di dati privati in loop

@Jeff_Perkinson ,
Sai cosa, vedo l'errore, invece usando il comando window, avrei dovuto creare una nuova vista dati dal momento che si tratta di una tabella dati privata. 

FilePath = "C:\Test.xlsx"; 
SheetsList = Get Excel Worksheets(FilePath); 
OpenDts = {}; 

for(i = 1, i <= N Items(SheetsList), i++,
  OpenDts[i] = Open(FilePath,
     "Private",
     Worksheets(SheetsList[i]),
     Use for all sheets( 1 ),
     Concatenate Worksheets( 0 ),
     Create Concatenation Column( 0 ),
     Worksheet Settings(1,
          Has Column Headers( 1 ),
          Number of Rows in Headers( 1 ),
          Headers Start on Row( 1 ),
          Data Starts on Row( 2 ),
          Data Starts on Column( 1 ),
          Data Ends on Row( 0 ),
          Data Ends on Column( 0 ),
          Replicated Spanned Rows( 1 ),
          Replicated Spanned Headers( 0 ),
          Suppress Hidden Rows( 1 ),
          Suppress Hidden Columns( 1 ),
          Suppress Empty Columns( 1 ),
          Treat as Hierarchy( 0 ),
          Multiple Series Stack( 0 ),
          Import Cell Colors( 0 ),
          Limit Column Detect( 0 ),
          Column Separator String( "-" )
           )
     );
//  Insert Into(OpenDts,"Data Table(" || SheetsList[i] || ")"); 
   );
Show(SheetsList); 
Show(OpenDts); 
// This works
for(i = 1, i <= N Items(OpenDts), i++, 
  OpenDts[i] << New Data View; 
   ); 

Ri: Come aprire le tabelle di dati privati in loop

@Jeff_Perkinson , 

       Ancora fallisce.  Ho usato lo script esatto e vedo che i riferimenti della tabella di dati sono memorizzati nella lista. Tuttavia, quando provo a renderli visibili, ciò non riesce ancora.

Ri: Come aprire le tabelle di dati privati in loop

Per chiarire, non è necessario provare a inserire in un elenco diverso (il tuo "OpenDTS"). Usa una lista sul lato sinistro dell'istruzione Open (), al posto di "dt".

 

FilePath = "~/Desktop/Test.xlsx"; 

SheetsList = Get Excel Worksheets(FilePath); 
OpenDts = {}; 

for(i = 1, i <= N Items(SheetsList), i++,
  OpenDts[i] = Open(FilePath,
     "Private",
     Worksheets(SheetsList[i]),
     Use for all sheets( 1 ),
     Concatenate Worksheets( 0 ),
     Create Concatenation Column( 0 ),
     Worksheet Settings(1,
          Has Column Headers( 1 ),
          Number of Rows in Headers( 1 ),
          Headers Start on Row( 1 ),
          Data Starts on Row( 2 ),
          Data Starts on Column( 1 ),
          Data Ends on Row( 0 ),
          Data Ends on Column( 0 ),
          Replicated Spanned Rows( 1 ),
          Replicated Spanned Headers( 0 ),
          Suppress Hidden Rows( 1 ),
          Suppress Hidden Columns( 1 ),
          Suppress Empty Columns( 1 ),
          Treat as Hierarchy( 0 ),
          Multiple Series Stack( 0 ),
          Import Cell Colors( 0 ),
          Limit Column Detect( 0 ),
          Column Separator String( "-" )
           )
     );
//  Insert Into(OpenDts,"Data Table(" || SheetsList[i] || ")"); 
   );
Show(SheetsList); 
Show(OpenDts); 
// This fails 
for(i = 1, i <= N Items(OpenDts), i++, 
  OpenDts[i] << Show Window(1); 
   ); 

Ri: Come aprire le tabelle di dati privati in loopÈ necessario memorizzare i riferimenti della tabella di dati in un elenco anziché riutilizzare la variabile dt.