Bonjour à tous,

J'ai un classeur dans lequel il y a ma macro, et à partir duquel je dois aller récupérer un autre classeur à ouvrir (choisis par l'utilisateur)
Ensuite, je dois faire des traitements entre ces deux fichiers.
Pour cela, je dois faire le distinguo entre ces deux classeurs et pour cela je souhaiterais que cl1 corresponde au premier classeur, et cl2 corresponde au deuxième classeur (celui que l'utilisateur choisis)

Je me suis fortement inspiré de ceci.

Mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Dim cl1 as workbook
Dim cl2 as workbook
    Dim NomFichier As String
 
Set cl1=ThisWorkbook
 
    NomFichier = RechercheFichier()
    If NomFichier = "" Then
        MsgBox "Vous n'avez sélectionné aucun fichier"
        Else
        Workbooks.Open NomFichier
Set cl2 = Workbooks(NomFichier) '<== plante ici
    End If
Sa me dit, l'indice n'appartient pas à la sélection.
Je ne trouve vraiment pas comment affecter ce nouveau fichier à mon cl2.

Merci à tous ceux qui pourront m'aider.
Cordialement