Mettre à jour un lien vers fichier excel par variable

stefexcel · 27 Juin 2011

Bonjour,

je travaille sur excel avec des fichiers ayant la même synthaxe.
type AA_budget_2011.xls, AB_budget_2011.xls.....
Dans un même fichier je peux faire des liens pour un même établissement vers plusieurs fichiers (AA_budget_2011.xls AA_Realisé_2011.xls ).
Serait il possible de gérer les intiales AA/AB.... comme des variables et que le simple fait de modifier la variable mette à jur automatiquement les liens vers le bon établissement. (plutôt que de passer par le menu données/modifier les liaisons...)

cdt.

job75 · 27 Juin 2011

Re : Mettre à jour un lien vers fichier excel par variable

Bonjour stefexcel, bienvenue sur XLD,

Si les initiales de 2 lettres sont en cellule A1 vous pouvez lancer cette macro :

Code:

Sub Liens()
Dim w As Worksheet
If Len([A1]) <> 2 Then Exit Sub
For Each w In Worksheets
  w.Cells.Replace "??_budget", [A1] & "_budget", xlPart
  w.Cells.Replace "??_Réalisé", [A1] & "_Réalisé" 'attention aux accents...
Next
End Sub

Ainsi les liens seront mis à jour dans toutes les feuilles.

Nota : la macro peut être lancée par une évènementielle Worksheet_Change.

A+

stefexcel · 27 Juin 2011

Re : Mettre à jour un lien vers fichier excel par variable

merci pour ce début de réponse mais la macro buggue.
en fait mes fichiers n'ont pas tous la même synthaxe

j'ai:
13 - MENSUALISE\[PC 2011 mensualisé.xlsx]COMEX Mensualisé'!D4
et
Budgets définitifs\[Budget PC 2011.xls]Budget mensualisé'!D25

J'ai tapé SM dans la cellule A1 puis lancé la macro mais apparamment ça ne marche pas. L'idée étant de remplacer PC par SM.

voici le code que j'ai copié dans l'éditeur...

Sub Liens()
Dim w As Worksheet
If Len([A1]) <> 2 Then Exit Sub
For Each w In Worksheets
w.Cells.Replace "?? 2011 mensualisé", [A1] & " 2011 mensualisé", xlPart
w.Cells.Replace "Budget ?? 2011", "Budget "&[A1]" 2011"
Next
End Sub

job75 · 27 Juin 2011

Re : Mettre à jour un lien vers fichier excel par variable

Re,

Je me suis basé sur votre post #1.

Mais si vous changez d'idée toutes les 5 minutes, adaptez la macro.

Il est évident qu'elle fonctionne sur un seul cas de figure, je vous ai montré le principe.

A+

Mettre à jour un lien vers fichier excel par variable

stefexcel

Guest

job75

XLDnaute Barbatruc

stefexcel

Guest

job75

XLDnaute Barbatruc

Discussions similaires

Mettre à jour un lien vers fichier excel par variable

stefexcel

Guest

job75

XLDnaute Barbatruc

stefexcel

Guest

job75

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency