Se connecter avec
S'enregistrer | Connectez-vous

[VBA] Récupérer nom du fichier en lien avec un autre fichier

Dernière réponse : dans Programmation
Lassé par la pub ? Créez un compte

A partir du code, j'ai créé :

  1. Sub ListLinks()
  2. Dim aLinks As Variant
  3. aLinks = ActiveWorkbook.LinkSources(xlExcelLinks)
  4. Sheets.Add
  5. Cells(1, 1).Value = aLinks
  6. End Sub


Mais toujours rien.
Mais je me demandai quel type de lien il detecte? Des liens hypertexte? Dans les formules?
Expert Programmation

Hmm, vu que aLinks est un tableau, pas sûr que ça fonctionne bien comme tu as mis.
Essaie déjà d'utiliser le code sur la page que je t'ai donné. Il devrait te mettre des message box avec le contenu de chaque lien
Expert Programmation

Citation :
The names in the array are the names of the linked documents, editions, or DDE or OLE servers.

Les documents, éditions, DDE et OLE serveurs liés.

Mais ça dépend aussi du paramètre que tu as passé. Essaie avec autre chose que xlExcelLinks

Ce que je veux dire par type de lien, c'est un lien hypertexte ou un lien dans une formule, ou un lien dans une macro, ou d'un tableau croisé dynamique ... Est ce qu'il va chercher la dedans?

Car je doit créer une application VBA qui converti des fichiers en 2007 mais le probleme est que j'ai des liens dans une macro par exemple :
  1. Windows("Excel.xls").Activate
Il faudra que mon programme change le ".xls" par "xlsx".
Est ce possible?
Lassé par la pub ? Créez un compte
Tom's guide dans le monde