da access ad excel

Question

ciao a tutti

premetto che sono un neofita di VB.

mi servirebbe un aiuto per passare i dati risultanti da una query in un db access ad un foglio excel

grazie in anticipo

Answer 1

Ciao hobo_3,

applicando lo stesso concetto di: How To Transfer Data from ADO Data Source to Excel with ADO
potresti eseguire una SELECT INTO per creare direttamente il file di excel o per creare il foglio in un file di excel esistente.
Esempio:

Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
                      & "D:\Dati\Documenti\Office\Access\Database1.accdb;User Id=admin;Password=;")
Dim cmd As New OleDbCommand("SELECT * INTO [Excel 12.0 Xml;Database=D:\Dati\Documenti\Office\Excel\File1.xlsx].[Foglio1] FROM Query1", cn)

cn.Open()
cmd.ExecuteNonQuery()

Ciao
Giorgio Rancati

Answer 2

ciao a tutti

premetto che sono un neofita di VB.

mi servirebbe un aiuto per passare i dati risultanti da una query in un db access ad un foglio excel

grazie in anticipo

Ti ricordo che è anche possibile interrogare un db di Access direttamente da Excel, sia tramite gli appositi wizard(diversi da versione a versione), sia tramite codice, un semplice esempio qui: http://www.maurogsc.eu/excel/xlsadosenzariferimenti.aspx . Grazie per l'attenzione.

---

Mauro Gamberini - Microsoft© MVP(Excel)
http://www.maurogsc.eu/

Answer 3

grazie ad entrambi per l'aiuto

ciao