fermer excel

[lotusx]

Rebonsoir à tous,

Comment ecrire si le mot de passe est "zozo" alors efface sinon ferme excel. En fait j'exprime mal ferme excel.

J'espère que c pas trop l'embrouille. Encore merci.


Private Sub CommandButton2_Click()
If UserForm2.TextBox1.Value = "zozo" Then
UserForm2.TextBox1.Value = Delete
Else: Workbook.Close
End If
End Sub

 

[Hervé]

bonsoir,

avec workbook.close, tu fermes le classeur.
pour quitter excel, fais
application.quit

bon courage
@+Hervé