Bonjour,
déjà, référence mieux ton 2eme classeur, (je ne suis pas sur que workbooks2 existe, à la rigeur WorkBooks(2): classeur n°2 ds la liste d'objet Workbook)) avec un système de variable de type workbook:
dim Classeur2 as Workbook (sans s car c'est un objet seul)
set classeur2 =.....
et dans ta formule, c'est .End(xlYp) et non pas End (x1Up).
A+
DSA