Copier les valeur d'une cellule dans un label d'un userform d'un autre clas

Bonsoir à tous, j'ai un soucis et j'aimerais que vous m'aidiez à régler le problème. Je possède de deux fichiers excel et j'aimerais me placer sur l'un et créé un userform de tel sorte que la donnée d'un label soit la valeur d'une cellule de l'autre fichier

Bonjour, le problème est que si le fichier sources n'est pas ouvert en même temps alors votre "Label" ne pourra pas lire le contenu de votre cellule.

Sinon pour initialiser votre userform vous aurez quelque chose du genre :

Private Sub UserForm_Initialize()
Label1.caption=workbooks("source.xlsm").sheets("Feuil1").range("A1").Value
end sub

A adapter avec le nom de votre fichier source le nom de la feuille source et la cellule souhaitée.

Merci beaucoup Xmenpl sa marche bien quand les deux fichiers sont ouverts. Je ne sais si c'est possible de le faire quand l'autre est fermee

Quand j'écris le code suivant sa marche quand le fichier source est fermé

workbooks.open("source.xlsm")

Private subUserForm_Initialize()

Label1.caption=workbooks("source.xlsm").sheets("Feuil1").range("A1").Value
end sub

le fichier source s'ouvre et la copie s'effectue. Maintenant lorsque j'associe l'instruction de fermeture du fichier source on me signale une erreur