recupere un fichier project avec excel

bonjours,

je voudrais recuperer un fichier project et l'enregistrer en tant que fichier excel.

j'ai donc commencer a ecrire et lorsque je teste ce message m'apparait:
"Microsoft office excel is wainting for another application to complete an OLE action".

le code est tt simple et ressemble a ca:
Sub test()

Dim pjTemp As MSProject.Application

MSProject.Application.FileOpen "J:\Dept 270 - Engineering Processes\Project macro\process 30A.mpp"

MSProject.Application.Visible = True

End Sub