Bonjour à tous,
Si j'ai bien compris, depuis un classeur A on lance une macro du classeur B. et depuis cette macro du classeur B on veut récupérer des données dans le classeur A :
Dans le classeur A :
Dim WS As Workbook, WBO As Workbook
Set WBO = ActiveWorkbook
chemin = "C:\xxx\xxx\xxxx\TESTS XL\"
fic = "APPOLLO12.xlsm"
Set WS = Workbooks.Open(chemin & fic) 'ouverture du classeur B
Application.Run fic & "!Polo", WBO 'appel de la sub Polo ( dans le classeur B) avec paramètre :variable classeur A
Dans le classeur B (dans un Module) :
Sub Polo(Classeur As Workbook)
MsgBox Classeur.Name 'donne le nom du classeur A
MsgBox Classeur.Worksheets("Feuil1").Range("A2").Value
End Sub
à adapter en fonction du besoin exact
A+