Export Access -> Excel - Logiciels - Windows & Software
Marsh Posté le 08-12-2004 à 11:40:48
moi ce que je fais pour pas que le fichier soit écrasé je rajoute date() et time() dans le nom du fichier
Marsh Posté le 08-12-2004 à 14:19:12
Ok merci, malheureusement les personnes qui ont ces besoins ne voudrons pas de cette solution, merci quand même phleup
Marsh Posté le 08-12-2004 à 16:05:39
Bon pour ceux que ça intéresse, voilà le code VBA qui ma permis de faire ce que je voulais (donc malheureusement je nest pas sut le faire quavec une macro Access).Je ne connais pas VBA mais ca semble marché :
Code:
Function MacroBilanContact2()
Dim appExcel As Excel.Application 'Application Excel
'Transfert des tables access dans une feuille portant le même nom que la table
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "BilanContact20032004Inscription2003", "BilanContact-Inscriptions.xls"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "BilanContact20032004Inscription2004", "BilanContact-Inscriptions.xls"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "BilanContact20032004MoisCumulEntretiensTable", "BilanContact-Inscriptions.xls"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "BilanContact20032004StageEntretiens", "BilanContact-Inscriptions.xls"
Set appExcel = CreateObject("excel.application" )
Set wbExcel = appExcel.Workbooks.Open("BilanContact-Inscriptions.xls" )
appExcel.Visible = True
End Function
Marsh Posté le 07-12-2004 à 16:21:44
Bonjour tout le monde , voila mon probleme :
sous access(2003) j'ai 4 tables à exporter dans un fichier Excel (une feuille par table), et cela doit etre fait juste en appuyant sur un boutton dans un formulaire.
Ne connaisant pas VBA et n ayant pas vraiment le temps de l'apprendre, je voulais faire ca avec une macro en utilisant des copierVer, mais malheureusement le fichier xls est écrasé à chaque fois
Si vous aviez une idée, merci
Message édité par Sylad le 09-12-2004 à 14:13:10