Bjr,
Je viens de trouver une solution pour supprimer ces liens.
A force de chercher je suis tombe dans le navigateur d Ooo ou j ai decouvert
123 feuilles cachees qui correspondent aux fameux liens que je cherche a
detruire.
Fort de cette info, j ai donc entrepris de supprimer toutes ces feuilles
cachees et surprise, les liens disparaissent en meme temps.
Ci dessous le code faisant le menage si cela peut servir :
NOTA : les feuilles PARAMETRE & TABLEAU sont les seules que je desire
conserver.
' Suppression des liens qui se sont générés automatiquement
' lors de l'accès à la feuille de calcul pour mise en place
' des smiley et du lien vers le fichier associé
' ---------------------------------------------------------
maxfeuille = fichier1.getSheets.Count -1
' Compter le nombre de feuilles du classeur
for n = 0 to maxfeuille
' Boucler sur toutes les feuilles
feuille1 = fichier1.getSheets.getByIndex(n)
' Référencer la feuille en cours
wnom_feuille = feuille1.name
' Mémoriser son nom
if wnom_feuille = "Tableau" or wnom_feuille = "Localisation" then
' Si nos feuilles
'print wnom_feuille & " A conserver"
' Ne rien faire
else
' Sinon
fichier1.sheets.removeByName(wnom_feuille)
' Détruire la feuille
'print wnom_feuille & " Détruite ... ", maxfeuille
maxfeuille = maxfeuille -1
' On décompte la feuille détruite dans maxfeuille
n = n-1
' On décompte la feuille dans indice
end if
next
Amicalement Eric
