VBA - Mise à jour de liaisons

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

mamax29

XLDnaute Nouveau
Bonjour,

J'ai un rapport mis à jour mensuellement via une macro VBA
Le rapport du mois en cours a une liaison avec celui du mois précédent afin d'intégrer au rapport en cours certaines données pour des graphiques

Leur rêgle de nommage c'est:
Rapport_Sxx.xls où Sxx correspond au numéro de la semaine.

Pour en revenir à mon problème, la macro VBA fait ceci pour générer le nouveau rapport:

- On sélectionne le (futur) ancien rapport
- On l'ouvre
- On le sauvegarde sous un nouveau nom
- On le mets à jour avec les nouvelle donnée
- On modifie les liaisons et on les mets à jour

C'est là que cela ne fonctionne pas.
Voici le bout de code:

Code:
    Dim wbrapport as Excel.workbook 'Nouveau rapport'
    Dim wbodrapport as Excel.workbook 'Rapport précédent'
 
    ....
    Le programme de mise à jour
    ....
 
    Set wboldrapport = Workbooks.Open(oldrapport)
    wbrapport.Activate
    liaison = ActiveWorkbook.LinkSources
    ActiveWorkbook.ChangeLink liaison(1), oldrapport, xlExcelLinks
    ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources
    wboldrapport.Close
    wbrapport.Save

Mais dès qu'on arrive à la ligne "ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources"

Excel me sort l'erreur suivante:
La methode 'UpdateLink' de l'objet '_Workbook' a échouée

Par contre les liens ont bien été mis à jour...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour