bonjour René du var,
voici un exemple pour une cellule, tu pourais y ajouter un boucle pour plusieurs cellules.
Sub valeurExterne()
Ligne = 1
colonne = 1
onglet = "noms"
Fichier = "BDD.xls"
rep = "c:\"
cells(Ligne, colonne) = ExecuteExcel4Macro _
("'" & rep & "\[" & Fichier & "]" & onglet & "'!R" & Ligne & "C" & colonne & "")
End Sub
sab