Bonjour,
Je dois ouvrir un gros fichier pour récupérer des données. Malheureusement ma macro n'attend pas l'ouverture effective du fichier pour continuer son travail.
J'ai essayé DoEvents, mais cela ne fonctionne pas.
Voici mon code :Du coup la partie with... n'est pas traitée.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Workbooks.Open (ChemBo & "Requete BO.xlsx") DoEvents Set WbBo = ActiveWorkbook With Sheets("NIR Sans suite") .ListObjects.Add(xlSrcRange, .Range("$C$9").CurrentRegion, , xlYes).Name = "TbBoSource" .ListObjects("TbBoSource").TableStyle = "TableStyleMedium5" End With
Merci de votre aide
Partager