Export da Access ad Excel

[gaetano73]

Ciao a tutti.
Uso Office 2010.

Ho associato il seguente codice

Codice: Seleziona tutto

nomeReport = "Report.xlsx"
nomeQuery = "BaseDati"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, nomeQuery, "C:\DepositoReport\" & nomeReport, True

ad un pulsante di Access ma l'effetto sortito non è quello atteso.
Nella cartella Excel "Report.xlsx" (dove c'è già un foglio chiamato "BaseDati") viene creato un nuovo foglio: "BaseDati1".
Io vorrei che il risultato della query di Access venisse scritto sul foglio "BaseDati" sovrascrivendo tutto il contenuto.
Dove sbaglio?

Grazie

Gaetano

[peppo55]

Ciao gaetano73,

prova questo codice

Codice: Seleziona tutto


DoCmd.OutputTo acOutputQuery, "Basedati", "ExcelWorkbook(*.xlsx)", _
    "C:\DepositoReport\Report.xlsx", False, "", , acExportQualityPrint




[gaetano73]

Ciao peppo55,

l'istruzione che mi hai suggerito crea un file con il solo foglio "BaseDati"...

[archimede]

Codice: Seleziona tutto

nomeReport = "Report.xlsx"
nomeQuery = "BaseDati"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, nomeQuery,_
      "C:\DepositoReport\" & nomeReport, True, nomeQuery & "!"

HTH.

Alessandro

[gaetano73]

Errore di run-time '3010':
Tabella 'BaseDati$' già esistente.

[archimede]

Forse il file xls era aperto nel momento in cui hai provato?

Alessandro

[gaetano73]

No, comunque per dissipare ogni dubbio ho chiuso tutto, riavviato, aperto solo il DB ed eseguito l'istruzione... stessa cosa

[peppo55]

Ciao gaetano73,

ho provato il codice di archimede (Ciao) e funziona se si omettono alla fine del codice i caratteri: & "!"

[gaetano73]

A me no Se tolgo i caratteri che mi hai indicato crea sempre un secondo foglio chiamato "BaseDati1"...

[peppo55]

Ciao gaetano73,

a questo punto potresti prendere in considerazione un altro metodo.
Dalla cartella Report , nel foglio Basedati (vuoto) fai la connessione alla query del db "BaseDati".
In questo modo, cambiando i criteri della query di Access, quando apri la cartella Report vengono aggiornati i dati.

[gaetano73]

Ho "risolto" così:
- ho puntato i pivot e i cerca.vert degli altri fogli sul foglio "BaseDati1";
- ho eliminato il foglio "BaseDati";
- ho rinominato "BaseDati1" in "BaseDati".
Ora, se eseguo il comando in Access non mi crea più un nuovo foglio ma sovrascrive il BaseDati.

Grazie comunque a tutti per l'aiuto.