Excel 2016 : rompre liaisons impossible ! comment faire ?

Bonsoir à tous,

j'utilise Excel 2016 de façon courante mais je suis face à un problème que je ne sais pas résoudre.

Je suis parti d'un document existant sans faire attention aux liaisons. Je n'arrive pas à les rompre avec l'option proposée dans la fenêtre "modifier liaisons". Ces documents liés n'existent plus et ne me sont d'aucune utilité. J'ai essayé de créer de faux documents avec le nom référencé mais rien n'y fait (erreur : source introuvable) ?

J'ai bossé comme un damné et cela me prendrait trop de temps à refaire tout le document. Il doit bien avoir un moyen ?

Je n'y connais rien VBA ou autres macros à développer ou intégrer. Quelqu'un pourrait m'aider ? merci de votre contribution et en vous souhaitant une bonne fin de journée,

Cyril

Bonjour,

Tu peux tester le code suivant :

Sub RompreLiaisons()
Dim Links As Variant
Dim i As Long
Links = ActiveWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks)
For i = 1 To UBound(Links)
ActiveWorkbook.BreakLink _
    Name:=Links(i), _
    Type:=xlLinkTypeExcelLinks
Next i
End Sub

En espèrant que cela t'aide ...

Bonjour et merci beaucoup. ça fonctionne super bien

en te souhaitant une excellente journée

Cyril

cyrfonk a écrit :

Bonjour et merci beaucoup. ça fonctionne super bien

en te souhaitant une excellente journée

Cyril

Ravi que cela puisse t'aider ...

Merci ... pour tes remerciements ...