Bonjour

J'ai un formulaire principal dans lequel j'ai inséré un sous formulaire.

Dans mon formulaire principal, j'ai une zone liste déroulante répertoriant les références pièces de mon stock puis j'ai ajouté deux champs textes au format date.
Un que j'ai nommé datedeb et un second champ que j'ai nommé datefin.

Pas de problème pour afficher les données de mon sous-formulaire sans avoir la notion de date, après sélection d'une référence dans la liste.
Je veux maintenant, que l'affichage tienne compte des champs dates qui peuvent être modifiées ou pas . Par défaut, la valeur de mon champ datefin correspond à la date du jour.

Je ne vois pas comment ajouter à la procédure après maj cette notion.

Je vous remercie



Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub ref_AfterUpdate()
 
 If IsNull(Me.ref) And IsNull(Forms![Formulaire SUIVI]![SUIVI JOURNALIER_regroupement].Form![Produit - numero]) Then
  Forms![Formulaire SUIVI]![SUIVI JOURNALIER_regroupement].Form![somme].Visible = False
   Forms![Formulaire SUIVI]![SUIVI JOURNALIER_regroupement].Form![txttotal].Visible = False
     Else
   End If
  Forms![Formulaire SUIVI]![SUIVI JOURNALIER_regroupement].Form![somme].Visible = True
  Forms![Formulaire SUIVI]![SUIVI JOURNALIER_regroupement].Form![txttotal].Visible = True
  End sub