Bug macro à l'ouverture workbook

Bonjour,
J'ai créé une macro, qui marche très bien si je la mets en cliquant sur bouton ( sub macro() ) .
Mais quand je vais lancer la macro en ouvrant le fichier excel (private sub workbook_open() ), la macro bug à la ligne "Sheets".


Voici la macro :

Private Sub Workbook_Open()

Workbooks.Open Filename:= _
"G:\Quality\Shares\Cartes de contrôle XIP\Quality\tests macros\copy of XIP 3.xls"
Sheets("965.861 B").Select --> c'est ici que j'ai le bug
Range("A12:AW100").Select
Range("A12:AW100").Copy

ActiveWorkbook.Close

Sheets("janv").Select
Range("A12:AW100").Select
Range("A12:AW100").PasteSpecial xlPasteAll
Sheets("janv").Select

End Sub



Merci d'avance pour vos réponses :)))