Bonjour,
Le corps d'une procédure débute par Sub et se termine par End Sub
Dans ton code, Sub apparait deux fois alors que End Sub n’apparait qu’une fois.
Sub test()
Private Sub Workbook_Open()
<Instructions>
End Sub
Il te faut donc choisir
Soit
Sub test()
<Instructions>
End Sub
Soit
Private Sub Workbook_Open()
<Instructions>
End Sub
A+