Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Sous formulaires conditionnels

Sous formulaires conditionnels

4 réponses
Avatar
Marlène
Bonjour,

Je ne suis pas très expérimentée et je suis en train de créer une base de
donnée sous Access 2000 Premium pour gérer la facturation.
Les données de mon formulaire principal concernent la facture en elle même
ex. le N°, la date, l'échéance ... J'ai inséré une case à cocher pour
distinguer deux types de prestations différentes.

Les données de mon sous formulaire son différentes suivant le type de
prestation.
C'est à dire : 1° cas Désignation et montant HT...
2° cas collaborateur, mois, calcul du nombre de jours
facturables (grâce à une requête) , Montant HT... De plus, il peut y avoir
plusieurs mois facturés dans la même facture.

Je pense dons qu'il me faut deux sous formulaires différents.

Je vous remercie pour votre aide précieuse

Marlène

--
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Raymond
Bonjour.

Tu peux passer comme tu l'as prévu par deux sous-formulaires et les charger
selon la valeur True ou False de ta case à cocher, en ajoutant un test de
non changement si la facture est commencée.

Private Sub Caseàcocher_BeforeUpdate(Cancel As Integer)
If isnull(No_Facture) Then
If Me.Prestation1 Then
Me.Sous_Formulaire.SourceObject = "Sous_Formulaire1"
Me.Sous_Formulaire.Visible = True
Me.Sous_Formulaire.LinkChildFields = "Monchampfils"
Me.Sous_Formulaire.LinkMasterFields = "Monchamp_Père"
Else
Me.Sous_Formulaire.SourceObject = "Sous_Formulaire2"
Me.Sous_Formulaire.Visible = True
Me.Sous_Formulaire.LinkChildFields = "champfils"
Me.Sous_Formulaire.LinkMasterFields = "champpère"
End If
else
Cancel = True
End If
End Sub
Tous les noms ne sont que des exemples.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Marlène" a écrit dans le message de
news:
Bonjour,

Je ne suis pas très expérimentée et je suis en train de créer une base de
donnée sous Access 2000 Premium pour gérer la facturation.
Les données de mon formulaire principal concernent la facture en elle même
ex. le N°, la date, l'échéance ... J'ai inséré une case à cocher pour
distinguer deux types de prestations différentes.

Les données de mon sous formulaire son différentes suivant le type de
prestation.
C'est à dire : 1° cas Désignation et montant HT...
2° cas collaborateur, mois, calcul du nombre de jours
facturables (grâce à une requête) , Montant HT... De plus, il peut y avoir
plusieurs mois facturés dans la même facture.

Je pense dons qu'il me faut deux sous formulaires différents.

Je vous remercie pour votre aide précieuse

Marlène

--




Avatar
Marlène
Je te remercie, je vais essayer tout de suite.
"Raymond" a écrit dans le message de news:

Bonjour.

Tu peux passer comme tu l'as prévu par deux sous-formulaires et les
charger

selon la valeur True ou False de ta case à cocher, en ajoutant un test de
non changement si la facture est commencée.

Private Sub Caseàcocher_BeforeUpdate(Cancel As Integer)
If isnull(No_Facture) Then
If Me.Prestation1 Then
Me.Sous_Formulaire.SourceObject = "Sous_Formulaire1"
Me.Sous_Formulaire.Visible = True
Me.Sous_Formulaire.LinkChildFields = "Monchampfils"
Me.Sous_Formulaire.LinkMasterFields = "Monchamp_Père"
Else
Me.Sous_Formulaire.SourceObject = "Sous_Formulaire2"
Me.Sous_Formulaire.Visible = True
Me.Sous_Formulaire.LinkChildFields = "champfils"
Me.Sous_Formulaire.LinkMasterFields = "champpère"
End If
else
Cancel = True
End If
End Sub
Tous les noms ne sont que des exemples.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Marlène" a écrit dans le message de
news:
Bonjour,

Je ne suis pas très expérimentée et je suis en train de créer une base
de


donnée sous Access 2000 Premium pour gérer la facturation.
Les données de mon formulaire principal concernent la facture en elle
même


ex. le N°, la date, l'échéance ... J'ai inséré une case à cocher pour
distinguer deux types de prestations différentes.

Les données de mon sous formulaire son différentes suivant le type de
prestation.
C'est à dire : 1° cas Désignation et montant HT...
2° cas collaborateur, mois, calcul du nombre de
jours


facturables (grâce à une requête) , Montant HT... De plus, il peut y
avoir


plusieurs mois facturés dans la même facture.

Je pense dons qu'il me faut deux sous formulaires différents.

Je vous remercie pour votre aide précieuse

Marlène

--







Avatar
Marlène
Peux tu me donner plus de détails pour que je puisse mettre en oeuvre cela.
Où dois-je insérer le code si dessous ? Comment crèer les 2 ous formulaires
? Je sais en créer un attaché à mon formulaire principal mais comment
dois-je faire por le deuxième ? C'est un peu la panique
Merci pour ton aide

Marlène

"Raymond" a écrit dans le message de news:

Bonjour.

Tu peux passer comme tu l'as prévu par deux sous-formulaires et les
charger

selon la valeur True ou False de ta case à cocher, en ajoutant un test de
non changement si la facture est commencée.

Private Sub Caseàcocher_BeforeUpdate(Cancel As Integer)
If isnull(No_Facture) Then
If Me.Prestation1 Then
Me.Sous_Formulaire.SourceObject = "Sous_Formulaire1"
Me.Sous_Formulaire.Visible = True
Me.Sous_Formulaire.LinkChildFields = "Monchampfils"
Me.Sous_Formulaire.LinkMasterFields = "Monchamp_Père"
Else
Me.Sous_Formulaire.SourceObject = "Sous_Formulaire2"
Me.Sous_Formulaire.Visible = True
Me.Sous_Formulaire.LinkChildFields = "champfils"
Me.Sous_Formulaire.LinkMasterFields = "champpère"
End If
else
Cancel = True
End If
End Sub
Tous les noms ne sont que des exemples.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Marlène" a écrit dans le message de
news:
Bonjour,

Je ne suis pas très expérimentée et je suis en train de créer une base
de


donnée sous Access 2000 Premium pour gérer la facturation.
Les données de mon formulaire principal concernent la facture en elle
même


ex. le N°, la date, l'échéance ... J'ai inséré une case à cocher pour
distinguer deux types de prestations différentes.

Les données de mon sous formulaire son différentes suivant le type de
prestation.
C'est à dire : 1° cas Désignation et montant HT...
2° cas collaborateur, mois, calcul du nombre de
jours


facturables (grâce à une requête) , Montant HT... De plus, il peut y
avoir


plusieurs mois facturés dans la même facture.

Je pense dons qu'il me faut deux sous formulaires différents.

Je vous remercie pour votre aide précieuse

Marlène

--







Avatar
Raymond
Les deux sous-formulaires sont dans le même contrôle. l'un remplace l'autre.
il faut l'insérer là comme indiqué: Private Sub Caseàcocher_BeforeUpdate
tu crées le 2e formulaire comme le premier.
dans la procédure, Me.Sous_Formulaire.SourceObject = "Sous_Formulaire1" ,
indique le nom du sous-formulaire que tu veux afficher.

faut pas paniquer.
si tu n'y arrives pas , envoie-moi ta base par mail ( en zip si possible)
avec ton formulaire principal (avec la case à cocher) et tes deux
sous-formulaires, je regarderai ce soir et te la renverrai ce soir aussi.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Marlène" a écrit dans le message de
news:%
Peux tu me donner plus de détails pour que je puisse mettre en oeuvre
cela.

Où dois-je insérer le code si dessous ? Comment crèer les 2 ous
formulaires

? Je sais en créer un attaché à mon formulaire principal mais comment
dois-je faire por le deuxième ? C'est un peu la panique
Merci pour ton aide

Marlène