Re : Recherche d'un dossier, un autre classeur et un onglet dans une formule
Bonjour a toute et a tous et Bonjour CHALET53,
J'ai effectué ce que tu m'à dis de faire et cela marche. Comment puis ajouter dans le module 1 une formulr pour aller chercher mes autre cellules, sans pour cela mettre a jour chaques cellules en appuyant sur le programme "Lance"?
Ex:
'Recherhcer "Conducteurs Présents"
Sub Formule2()
nomfichier = Range("C1").Value
chemin = "='" & Range("J19") & Range("A1") & "\[" & nomfichier & ".xlsm]Semaine Jacomi'!$V$42"
Range("C5") = chemin
' Cells(k, 7).Formula = "=VLOOKUP(" & Cells(k, 1).Address & ",'" & chemin
'If Application.IsNA(Cells(k, 5)) = True Then Cells(k, 5) = ""
If Application.IsError(Range("C5")) = True Then Range("J22") = ""
'Recherhcer "Nombre de Véhicules"
nomfichier = Range("C1").Value
chemin = "='" & Range("J19") & Range("A1") & "\[" & nomfichier & ".xlsm]Semaine Jacomi'!$V$42"
Range("C6") = chemin
' Cells(k, 7).Formula = "=VLOOKUP(" & Cells(k, 1).Address & ",'" & chemin
'If Application.IsNA(Cells(k, 5)) = True Then Cells(k, 5) = ""
If Application.IsError(Range("C6")) = True Then Range("J22") = ""
End Sub
Merci encore pour ton aide.
JR.31