Discussion :

[BCBFIS]

J'ai créé une table T_FourNouveau pour créer une liste de fournisseurs et parallèlement un formulaire F_FourNouveau. Dans ce formulaire, j'essaie, sans succès jusqu'à présent, que la clé primaire N°_ID devant afficher le N° du fournisseur n'apparaisse pas aussi longtemps que je n'ai pas introduit la raison sociale ou la civilité du fournisseur (Four_RSoCiv).
J'avais indiqué dans les propriétés du N° du fournisseur qu'il ne soit pas visible, mais, apparemment, cela empêche de le rendre visible par la suite; j'ai ensuite placé des conditions If après avoir modifié la propriété "visible" du N° du fournisseur sans davantage de succès alors que j'ai déjà réalisé ce genre de manoeuvre sur une autre base de données avec une case OUI/NON.
Je joins la BDD. Il ne faut pas se préoccuper des tables codes postaux ou pays, ni des copie de tables ou de formulaires; ces éléments sont là pour l'avenir.
Merci à tous pour l'aide que vous voudrez bien m'apporter.

[Robert1957]

Bonjour BCBFIS,

J'avais indiqué dans les propriétés du N° du fournisseur qu'il ne soit pas visible, mais, apparemment, cela empêche de le rendre visible par la suite;

C'est faux. Il est possible de remettre la propriété visible à vrai.

Cependant votre raisonnement:

la clé primaire N°_ID devant afficher le N° du fournisseur n'apparaisse pas aussi longtemps que je n'ai pas introduit la raison sociale ou la civilité du fournisseur (Four_RSoCiv).

Comporte une grosse lacune, si l'utilisateur saisie un autre champ le numéro auto sera créé mais vous ne l'afficherez pas puisque vous faite le test sur le champ "Four_RSoCiv"

En supposant que votre champ du numéro du fournisseur se nomme "Four_ID".

Ensuite dans l'événement "Form_Dirty" qui est l'événement déclenché dès qu'une saisie est faite dans le formulaire et c'est à ce moment précis que le numéro auto est créé le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Form_Dirty(Cancel As Integer)
Me.Four_ID.Visible = True
End Sub

Il faut aussi considéré l'événement "Form_Current" puisque si on se déplace vers un nouvel enregistrement le formulaire va garder l'ancienne valeur (visible = vrai).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Form_Current()
If Nz(Me.Four_ID, "") <> "" Then
    Me.Four_ID.Visible = True
Else
    Me.Four_ID.Visible = False
End If
End Sub

Bonne journée

[BCBFIS]

Merci bien Robert1957.
Concernant le fait que l'on pourrait saisir un autre champ que la raison sociale ou la civilité, je compte placer un test interdisant de le laisser vide.
Bonne journée àvous.