bonjour,
je verouille au futures utilisateurs la possibilite d enregistrer mais pour cela j ecris ds "thisworkboo" un evenement:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
UserForm4.Show
If UserForm4.TextBox1.Value = " password" And UserForm4.CommandButton1.value = true Then _
Cancel = False
End Sub
mais le teste du bouton du userform ne fonctionne pas , comment faire ? ou est l erreur?

car ce matin je vois rien!
merci
seulement