bonjour
je ne sais pas si il est d'habitude sur ce forum de répondre après la clôture d'un message, mais je me permet
on peut l’écrire en une seule ligne :
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Cancel = MsgBox("voulez-vous quitter ?", vbYesNo + vbQuestion + vbDefaultButton2, "Quitter") = vbNo
End Sub
salut dan, content de te croiser
a plus