formule avec fichier source en variable

[guigui76]

Bonjour, après de plusieurs heures de recherche, je n'arrive pas à déclaré le nom du fichier source pour une liaison entre les deux classeurs.

Le début de la macro recherche le dernier fichier modifier puis une fois trouvé je voudrais que la formule s'adapte au nouveau nom.

Merci pour votre aide.

Guigui76

 

[pierrejean]

Re : formule avec fichier source en variable

Bonjour guigui76

A tester:

Sub Ouvre_le_dernier_xls()
Set wk = ThisWorkbook
Dim Chemin As String
Chemin = "C:\Users\jeux\Desktop"
'Chemin = ThisWorkbook.Path
y = DernierFichierCreer(Chemin)
If y <> "" Then
Z = Chemin & "\" & y
Workbooks.Open Z
wk.Activate
Range("G12").FormulaR1C1 = "='[" & y & "]Feuil1'!R4C2"
End If
End Sub

 

[guigui76]

Re : formule avec fichier source en variable

Ok merci je vais testé ce soir au travail.
Je t'informerai demain apres midi

Guigui

 

[guigui76]

Re : formule avec fichier source en variable

Est on obligé d'ouvrir le fichier source?
Si oui l'ouverture peut ralentir le traitement.

 

[pierrejean]

Re : formule avec fichier source en variable

Re

Tu peux tester en mettant en commentaire la ligne
Workbooks.Open Z
J'ai prevu l'ouverture en me referant au libelle de la macro !!!

 

[guigui76]

Re : formule avec fichier source en variable

Ok, je te remercie cela correspond parfaitement à mes souhait.
Merci pour tous.
Cordialement

Guigui76