Koppeling met excel

[rxr]

Hallo,

Ik heb een perfecte query gemaakt. Nu wil ik graag met een knop deze naar een excel bestand kunnen krijgen. Nu is dat niet het probleem want er zit namelijk een heel mooi knopje alleen die gaat naar een nieuwe pagina.

Mijn vraag is dan. Kan ik de gegevens van mijn query in een bestaand excel bestand krijgen op een specifieke tabblad. Is dat mogelijk.

 

[TheM]

Ik kan je niet precies zeggen hoe. Maar ik denk dat je hiervoor aan de slag moet in VBA.

Wat je zou kunnen doen is kijken wat er nu in VBA staat voor het exporteren. Mogelijk is dit makkelijk uit te breiden.

 

[huijb]

Zet deze code eens onder de knop;

Private Sub QueInvoerExport_Click()
strExpFilePath = Application.CurrentProject.Path & "\Naambestand.xls"

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "QueryNaam", strExpFilePath, -1

End Sub