J'ai cherché dans les forums, mais ma recherche n'est pas des plus courantes, lol.
J'aimerais interdire de renommer un fichier excel.
Apparemment, c'est une configuration windows...
Donc j'essaie de fermer le fichier dès son ouverture si le nom ne correspond plus avec celui que j'ai choisi. Le problème c'est que mon cde ne va pas...
Le classeur se ferme quelque soit le nom du fichier Excel.
Code:
Private Sub Workbook_Open()
MsgBox ActiveWorkbook.Name
'C'est pour pouvoir stopper le programme
nom = ActiveWorkbook.Name
If nom <> "Classeur*" Then
ActiveWorkbook.Close
End If
End Sub
Qu'est-ce qui ne va pas ?
Que mon classeur s'appelle "Classeur1.xls" ou "Essai.xls", il se ferme...
Salut,
C'est parceque la chaine de caratère cherchée est exclusivement "Classeur*"
Tout ce qui est différent de : Classeur* se fermera et comme
Classeur1.xls <> Classeur* et Essai.xls <> Classeur*
ces fichiers se ferment