apapa59
Nouveau membre
Bonjour à tous.
J'aimerai réaliser une macro sous MSProject qui une fois lancée exporte le fichier sous excel (ça c'est bon ) mais egalement qui copie le contenu de l'export dans une nouvelle feuille d'une page excel déja rédigée ( je ne sais pas si je suis assez clair...)
Voici le code que j'ai rédigé mais il ne marche pas (le debugger m'indique une erreur d'objet)
(Il manque les lignes de code pour sauvegarder et liberer la memoire)Voyez vous là où ça cloche?
Merci d'avance!
J'aimerai réaliser une macro sous MSProject qui une fois lancée exporte le fichier sous excel (ça c'est bon ) mais egalement qui copie le contenu de l'export dans une nouvelle feuille d'une page excel déja rédigée ( je ne sais pas si je suis assez clair...)
Voici le code que j'ai rédigé mais il ne marche pas (le debugger m'indique une erreur d'objet)
Code:
Sub export_j()
FileSaveAs Name:="D:\blablabla\data.xls", _
FormatID:="MSProject.XLS8", _
map:="mon_mappage"
Set ExcelAppli = CreateObject("Excel.application")
Set objFSO = CreateObject("Scripting.FileSystemObject")
ExcelAppli.Application.Workbooks.Open "D:\blablabla\data.xls"
ExcelAppli.Application.Workbooks.Open "D:\blablabla\fichier_receveur.xls"
ExcelAppli.Visible = True
ExcelAppli.Application.Workbooks("data.xls").Sheets("feuil1").Select
ExcelAppli.Application.Workbooks("data.xls").Sheets("feuil1").Copy Before=Workbooks("fichier_receveur.xls").Sheets("graph")
End Sub
Merci d'avance!