Private Sub CommandButton1_Click()
If MsgBox('Ton code', vbYesNo) = vbYes Then
'ce que ca doit faire'
End If
End Sub
Private Sub CommandButton1_Click()
USF.show
End Sub
Private Sub BoutonOK_Click()
'ce que ca doit faire'
End Sub
Private Sub boutonAnnuler_Click()
unlod me
End Sub