Private Sub TB_Nom_Change()
'débloquer
Me.CommandButton1.Enabled = TB_Nom <> ""
Me.TB_Prenom.Enabled = TB_Nom <> ""
Me.OB_phone.Enabled = TB_Nom <> ""
End Sub
'-----------------------------------------------------------------
Private Sub UserForm_Initialize()
'bloquer sauf me.TB_Nom
Me.CommandButton1.Enabled = False
Me.TB_Prenom.Enabled = False
Me.OB_phone.Enabled = False
End Sub