Rompre les liaisons d'une seule feuille

Bonjour,

J'ai créé une macro pour copier un onglet d'un fichier A à un fichier B.

Le problème est que j'aimerai supprimer les liaisons créées dans le fichier B avec le fichier B.

J'ai bien, compris que "xlLinkTypeExcelLinks" n'est que pour un workbook. Je n'arrive pas à trouver quel type correspond à seulement une sheet.

Ainsi je pourrais mettre activesheet à la place.

"Dim Liaisons As Variant

Liaisons = ActiveWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks)

If IsEmpty(Liaisons) = True Then Exit Sub

For LiaisonsTrouvee = 1 To UBound(Liaisons)

ActiveWorkbook.BreakLink _

Name:=Liaisons(LiaisonsTrouvee), _

Type:=xlLinkTypeExcelLinks

Next LiaisonsTrouvee"

Avez-vous un moyen de supprimer les liaisons que d'une seule feuille?

Merci beaucoup

Bonsoir,

je sais que je ne répond pas à la question, mais voyez ce fichier :

Il permet une sauvegarde d'une feuille à partir d'un classeur source vers un classeur "archive", mais il y a deux boutons : un qui sauvegarde avec les liaisons vers le classeur source, l'autre qui fait une sauvegarde sans liaisons.

Le seul inconvénient et pas des moindres, c'est que dans ma façon de faire cela "supprime" également les formules sans liaison de la feuille du classeur Archive. Normal pour une archive, il manquerait plus qu'une date évolue en fonction de "Aujourdui()" !

Voyez si cela peut faire avancer votre affaire...

@ bientôt

LouReeD

Merci Looreed,

je vais regarder ça.

Bonne journée

Bonsoir, et merci de votre merci.

Reste plus qu'à voir ce que vous aurez vu !

@ bientôt

LouReeD

j'ai pas réussis

Comme je connais le nom du fichier source je l'ai mis en dur.

J'ai fais la simplicité mais ça marche. Sauf si un petit malin change le nom du fichier

Encore merci

Rechercher des sujets similaires à "rompre liaisons seule feuille"