Insertion chemin dans formule

[chrisdu73]

Bonjour le forum,
Voilà j'aurai juste voulu savoir si cela est possible, je voudrais insérer dans une formule un chemin pour lire une valeur dans un fichier fermer ?

ActiveCell.FormulaR1C1 = _
"=IF(R[-2]C[-5]>=[date.xls]Feuil1!R2C2,[date.xls]Feuil1!R2C2,R[-2]C[-5])"

j'arrive à le faire si le fichier est ouvert comme dessus, mais pas quand il est fermer.

Merci pour votre aide

 

[job75]

Re : Insertion chemin dans formule

Bonjour chrisdu73,

Dim chemin$
chemin = ThisWorkbook.Path 'à adapter éventuellement
ActiveCell.FormulaR1C1 = _
"=IF(R[-2]C[-5]>='" & chemin & "\[date.xls]Feuil1'!R2C2,'" & chemin & "\[date.xls]Feuil1'!R2C2,R[-2]C[-5])"

Pas très compliqué mais il faut mettre les guillemets anglais aux bons endroits.

A+

 

[job75]

Re : Insertion chemin dans formule

Re,

Bien sûr on peut aussi mettre le slash \ et le guillemet anglais ' dans chemin :

Dim chemin$
chemin = "'" & ThisWorkbook.Path & "\" 'à adapter éventuellement
ActiveCell.FormulaR1C1 = _
"=IF(R[-2]C[-5]>=" & chemin & "[date.xls]Feuil1'!R2C2," & chemin & "[date.xls]Feuil1'!R2C2,R[-2]C[-5])"

A+

 

[chrisdu73]

Re : Insertion chemin dans formule

Encore une fois merci à toi pour cette aide
Bonne journée