Non, c'est bon laissez tomber vous êtes pas assez rapide.
En fait c'est pratique si vous avez fait un classeur excel dont vous ne voulez pas que l'on change le nom. A l'ouverture ca test si le nom est changé !
Pour ceux que ca interesse:
Private Sub Worbook_Open()
' Teste si le classeur abc est ouvert
On Error Resume Next
Workbooks("abc.xls").Activate
If Err <> 0 Then
' Si le fichier ne porte pas le nom de abc.xls, excel l'enregistre sous abc.xls
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs "abc.xls"
Application.DisplayAlerts = True
End If
End Sub