Mise à jour de liaisons excel
Résolu
sanchis81
Messages postés
138
Statut
Membre
-
sanchis81 Messages postés 138 Statut Membre -
sanchis81 Messages postés 138 Statut Membre -
Bonjour à tous,
J'ai un fichier excel A comportant certaines liaisons avec d'autres fichiers excel (B,C,D...).
Aujourd'hui, lorsque j'ouvre le fichier excel A, si je veux mettre à jour ces liaisons, je dois obligatoirement ouvrir les fichiers correspondants (B,C,D...).
Existe-t-il un moyen d'ouvrir le fichier A et de mettre à jour les liaisons sans avoir à ouvrir les autres fichiers excel?
Merci d'avance pour votre réponse.
Sanchis 81
J'ai un fichier excel A comportant certaines liaisons avec d'autres fichiers excel (B,C,D...).
Aujourd'hui, lorsque j'ouvre le fichier excel A, si je veux mettre à jour ces liaisons, je dois obligatoirement ouvrir les fichiers correspondants (B,C,D...).
Existe-t-il un moyen d'ouvrir le fichier A et de mettre à jour les liaisons sans avoir à ouvrir les autres fichiers excel?
Merci d'avance pour votre réponse.
Sanchis 81
5 réponses
-
Bonjour,
Oui, mais cela demande d'analyser les données à importer: emplacement et structures identiques ou non des fichiers,nombre de cellules à importer, dispositions dans chaque fichier etc...
en fonction de ca voir si ca ne vaut le coup ou pas...
un petit exemple si tu as peu de cellules à importer, mais...
Sub lire_ferme() Dim chemin As String chemin = ThisWorkbook.Path Range("A3") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R1C1") Range("B4") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R2C2") Range("C8") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R5C3") Range("E9") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R7C4") End Sub
demo:
http://www.cijoint.fr/cjlink.php?file=cj201007/cijxHgm8Pw.zip