chez moi cela se compile bien.
un conseil tout de même, parce que je ne pense pas que ton code marche
'si tu veux faire référence à ces classeurs, utilise la méthode set
'attention aux noms du classeur un classeur ne porte pas l'extension .xls tant qu'il n'a pas été sauvé
nomclas1 = "Classeur2"
nomclas2 = "Classeur1"
Set clas1 = Workbooks(nomclas1)
Set clas2 = Workbooks(nomclas2)