XL 2019 Configuration de bouton de formulaire sous condition

bonjour mhtc bonjour le forum
je ne vais répondre qu'a une toute petite partie de vos questions
pour le N° 1 la 1er partie je vous propose le code ci dessous
le bouton ajouter fonctionnera uniquement si les textbox montant et piece contiennent une valeur. ça ne répond pas a la problèmatique date, mais c'est un début de réponse
cordialement
galougalou

Private Sub montant_AfterUpdate()
If montant.Value <> "" Then
montant = Format(Val(Replace(montant, ",", ".")), "#,##0") & " FCFA"
Else
montant.Value = ""
End If
End Sub

Private Sub ajouter_Click()
Dim wks As Worksheet
Dim add As Range
If montant <> "" Or montant = 0 Then
If piece <> "" Then
Set wks = Feuil1
Set add = wks.Range("a65356").End(xlUp).Offset(1, 0)
add.Offset(0, 0).Value = benef
add.Offset(0, 1).Value = recept
add.Offset(0, 2).Value = numfact
add.Offset(0, 3).Value = dfact
add.Offset(0, 4).Value = montant
add.Offset(0, 5).Value = dcf
add.Offset(0, 6).Value = piece
add.Offset(0, 7).Value = rcf
add.Offset(0, 8).Value = dac
add.Offset(0, 9).Value = dpaid
End If
End If

End Sub

merci @GALOUGALOU pour cette promptitude... le bouton marche déja comme je le souhaite