Bonjour,

En m'inspirant des réponses contenues dans le message suivant (http://www.developpez.net/forums/d45...artir-daccess/),
j'ai essayé de lancer une macro XLS dans du code VBA mais cela ne fonctionne pas : pas de message d'erreur, affichage d'une feuille XLS bizarre (sans cellule et avec un titre correspondant à la macro, impossible d'intervenir sur la feuille, seule la fermeture du fichier est possible).
Cette macro fonctionne sous EXCEL

Ci-après le code VBA
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
  Set objApp = CreateObject("excel.application")
  FichierExcel = "F:\Mes Documents Société Générale\03- mission GTS-SCE\Outil Devis\Modèle Synthèse Devis.xls"
  Set objbook = objApp.Workbooks.Open(FichierExcel, ReadOnly:=True)
  Set objsheet = objbook.Worksheets("Projet")
  objApp.Visible = True   'si on veut visualiser
Exécution de plusieurs commandes XLS ensuite
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
With objsheet
    .Activate
' Données générales
    .Range("CodeMAO").Value = CodeMAO
    ...
End With
Puis exécution de ma macro XLS
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
    With objApp
         .Run ("Masquer_Ligne_nulle")
    End With
Si quelqu'un a une idée de ce qui ne va pas ...

Merci d'avance pour votre aide