VBA supprimer un lien vers un fichier DAT

Résolu/Fermé
Elboubdelapampa Messages postés 171 Date d'inscription mardi 26 janvier 2010 Statut Membre Dernière intervention 18 mars 2012 - 5 mai 2010 à 13:37
Elboubdelapampa Messages postés 171 Date d'inscription mardi 26 janvier 2010 Statut Membre Dernière intervention 18 mars 2012 - 5 mai 2010 à 14:13
Bonjour,
J'ai une macro qui à chaque ouverture du fichier excel crée des liens vers des fichiers .dat avec ".QueryTables.Add".
Donnant toujours le même nom au lien, je pensais que celui-ci écrasait l'ancien. Malheureusement la macro rajoute un chiffre après le nom.
Du coup je me trouve avec 12 feuilles excel comportant chacune plus de 400 liens (dont 355 sont obsolètes) et un fichier à plusieurs méga...

Je voudrais:
1. Trouver les nom des liens crée
2. les supprimer

J'ai essayé avec "BreakLink", "LinkSources", "Hyperlinks.Name"
Mais il ne trouve pas de lien

Est-ce que vous avez une autre idée?
Merci d'avance
A voir également:

1 réponse

Elboubdelapampa Messages postés 171 Date d'inscription mardi 26 janvier 2010 Statut Membre Dernière intervention 18 mars 2012 7
5 mai 2010 à 14:13
J'ai trouvé:

Sub supprimer_noms()
nbre = ThisWorkbook.Names.Count
If nbre > 0 Then
For cptr = 1 To nbre
ThisWorkbook.Names(1).Delete
Next
End If
End Sub
0