Discussion :

[delcroixf]

Bonjour toujours d'aussi loin mais maintenant entre la Polynésie et la Nouvelle-Calédonie !

Déjà certainement traité sous certaines formes...

J'ai un sous formulaire SF_FDM_Détails (voir PJ1) dans lequel je sélectionne un item dans la liste déroulante.
Selon l'item sélectionné je désire affiché des champs spécifiques.
Ex :
Hôtel : [Nuitees]
Restaurant : [Repas]; [Couverts]
Taxi : [Depart];[Arrivee]...

Ces champs sont bien sûr déjà répertoriées dans ma table utilisées pour le SF.

J'ai créé un code du type basé sur MAJ de ma liste déroulante "Type_FDM" :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub Type_FDM_AfterUpdate()
Select Case Me.[Type_FDM]
Case "1"
Me.[Repas_Type].Visible = True
Me.Nuitees.Visible = False
Me.Nb_Couverts.Visible = True
Me.Lieu_Départ.Visible = False
Me.Lieu_Arrivee.Visible = False
 
Case "4"
Me.[Repas_Type].Visible = False
Me.Nuitees.Visible = False
Me.Nb_Couverts.Visible = False
Me.Lieu_Départ.Visible = True
Me.Lieu_Arrivee.Visible = True
 
Case "10"
Me.[Repas_Type].Visible = False
Me.Nuitees.Visible = True
Me.Nb_Couverts.Visible = False
Me.Lieu_Départ.Visible = False
Me.Lieu_Arrivee.Visible = False
 
Case Else
Me.[Repas_Type].Visible = False
Me.Nuitees.Visible = False
Me.Lieu_Départ.Visible = True
Me.Lieu_Arrivee.Visible = True
 
End Select
End Sub

De là découle cet affichage pas très sexy : voir PJ2.

Mes questions :

1) Y a-t-il une façon plus simple d'écrire mon code que de répéter les éléments. Au final je devrais disposer peut-être de 10 affichages différents...
2) Comment écrire le code pour éviter que le choix d'UN enregistrement influe sur les suivants ?
3) Dans quel événement de contrôle, de SF et de F principal dois-je répéter mon code pour éviter "une remise à zéro" soit l'affichage initial ? pour le moment il n'est basé que sur "Après MAJ" de la liste déroulante.

Je vous remercie.

Fd

[hyperion13]

Salut,
Fidji? Tonga? Bref ...
As-tu quelque chose comme ça dans ta conception :
tblFrais (idFrais, ..., ...)
tblTypeFrais (idTypeFrais, TypeFrais)
tblLignesFrais (idFrais, idTypeFrais, dateSaisie, Qte)

[delcroixf]

Bonjour,

Je connais bien aussi ces îles qui sont sous ma "juridiction" aussi. Le Vanuatu ancienne Nouvelles-Hébrides est aussi magique !

Comme je le stipulais dans mon message initial, oui je pense avoir bien construit ma base. En PJ, la table à laquelle je fais référence pour mon SF.

[hyperion13]

Salut
Je supprimerai nuitée et nb_couvert pour les remplacer par un seul champ Qte que j’insèrerai entre Type et Devise.
Je supprimerai la combobox repas_type et ajouterai les valeurs petit dej, repas dans Type.