Bon matin
J'ai un soucis, j'aimerais lorsque je clique sur le bouton ajout de mon userform que la date du jour en TextBox2 s'inscrire automatiquement
Private Sub BoutAjout_Click()
If TextBNom.Text = "" Then Beep: Exit Sub
If SurAjout Then
SurAjout = False
BoutAjout.Caption = "Modifier/ Mise a jour"
BoutNew.Caption = "Nouveau"
AjoutDansBase
Else
If IndexBase = 0 Then Beep Else ModifieBase
End If
merci bcp
End Sub
J'ai un soucis, j'aimerais lorsque je clique sur le bouton ajout de mon userform que la date du jour en TextBox2 s'inscrire automatiquement
Private Sub BoutAjout_Click()
If TextBNom.Text = "" Then Beep: Exit Sub
If SurAjout Then
SurAjout = False
BoutAjout.Caption = "Modifier/ Mise a jour"
BoutNew.Caption = "Nouveau"
AjoutDansBase
Else
If IndexBase = 0 Then Beep Else ModifieBase
End If
merci bcp
End Sub