Rompre les liaisons

Bonsoir

Teste ce code VBA met-le dans un module et ensuite active-le normalement il te supprime tout tes liaisons 

​
Sub Macro1()
    If Not IsEmpty(ActiveWorkbook.LinkSources(xlExcelLinks)) Then
            For Each x In ActiveWorkbook.LinkSources(xlExcelLinks)
            ActiveWorkbook.BreakLink Name:=x, Type:=xlExcelLinks
        Next
    End If
End Sub

​

Slts

Merci The_Boss_68

désolé pour cette réponse tardive, mais je viens de rentrer chez moi ce midi. J'ai aussitôt copier la macro dans un module, j'étais content car j'ai pu travailler un peu de temps puis de nouveau le bug.

J'ai omis de préciser que mon fichier était enregistrer sur le cloud, je ne sais pas si cela a une importance.

Est-il normal que la fenêtre :"modifier les liaisons" affiche toujours les fichiers concernés pas les laissons.

Je crois qu'en dernier ressort, je vais supprimer les feuilles qui bugent et les reprendre, non plus en les déplaçant de mon fichier source, mais en faisant un copier - coller les valeurs.

Merci d'avoir prit du temps pour moi.

Cdlt

Bonjour mchotard

Avez-vous pensé à regarder dans le gestionnaire de noms, il peut y avoir des références à d'autre classeurs, il faut les supprimer si possible ou les remplacer par des noms internes au fichier

Bonjour PHILOU10120

Merci pour cette réponse qui vient tout solutionner à mon problème. C'est parfait, je suis très satisfait.

Bon dimanche

mchotard