Salut Christophe
essaye dans le macros d'utliser arrêt maxro apprès la 1ère importation ensuite importer la second feuil.
voici un code vba
Déclaration:
Dim appexcel as Excel.Application
Dim wbexcel as Excel.Workbook
Ne pas oublier de cocher dans le menu Outil/Références, la bibliothèque Microsoft Excel X Object Library (avec x = 8 pour Excel 97, x = 9 pour Excel 2000, x = 10 pour excel XP, x = 11 pour excel 2003).
Bonne chance.
Merci
Appel du fichier Excel :
Set appexcel = CreateObject("Excel.Application")
appexcel.Visible = True
Set wbexcel = appexcel.Workbooks.Open("Chemin du fichier Excel")
Appel de la feuille correspondante :
appexcel.Sheets("Feuil1").Select
Remplissage dans Excel (Exemple à partir d'une requête), sur des cellules bien précises.
appexcel.cells(5, 2) = rst![Nomduchamps]
appexcel.cells(5, 4) = rst![Nomduchamps]
appexcel.cells(5, 7) = rst![Nomduchamps]
Attention la cellule (5,2) correspond à la cellule B5 d'excel. la fonction rst correspond à un enregistrement RecordSet.