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 rafraichissement d'un sous-formulaire

rafraichissement d'un sous-formulaire

2 réponses
Avatar
C15
Bonjour à tous et toutes,

J'ai un formulaire contenant 2 sous-formulaires.
Dans un de ceux-ci j'ai une case à cocher qui fait passer un contrôle du
même formulaire à 0 :

Private Sub Payée_Click()
Me.Montant.Value = 0
Me.Requery
End Sub


Dans le formulaire principal, j'ai mis un bouton "Sauvegarder" pour valider
les saisies :

Private Sub Sauvegarder_Click()
On Error GoTo Err_Sauvegarder_Click

DoCmd.RunCommand acCmdSaveRecord
Me.F_Année_Assemblée_1.Locked = True
Me.T_Cotisations_par_année_sous_formulaire.Locked = True
Me.Requery

Exit_Sauvegarder_Click:
Exit Sub

Err_Sauvegarder_Click:
MsgBox Err.Description
Resume Exit_Sauvegarder_Click

End Sub


Or quand je coche une des cases le contrôle correspondant passe à 0 mais le
formulaire principal revient sur le 1er enregisytrement et ne reste pas sur
l'enregistrement en cours.
Comment rester sur cet enregistrement en cours pour bien vérifier la
nouvelle valeur du contrôle et sa prise en compte dans un calcul
récapitulatif ?

Merci de votre aide

A+

c15
Signaler un problème avec ce contenu

2 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.

essaie Me.Refresh
"
La méthode Refresh effectue une mise à jour immédiate des enregistrements de
la source d'enregistrements sous-jacente d'un formulaire ou d'une feuille de
données spécifié(e), de manière à tenir compte de vos modifications et de
celles des autres utilisateurs dans un environnement multi-utilisateur
"
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"C15" a écrit dans le message de
news:3f8cecf0$0$15439$
Bonjour à tous et toutes,

J'ai un formulaire contenant 2 sous-formulaires.
Dans un de ceux-ci j'ai une case à cocher qui fait passer un contrôle du
même formulaire à 0 :

Private Sub Payée_Click()
Me.Montant.Value = 0
Me.Requery
End Sub


Dans le formulaire principal, j'ai mis un bouton "Sauvegarder" pour
valider

les saisies :

Private Sub Sauvegarder_Click()
On Error GoTo Err_Sauvegarder_Click

DoCmd.RunCommand acCmdSaveRecord
Me.F_Année_Assemblée_1.Locked = True
Me.T_Cotisations_par_année_sous_formulaire.Locked = True
Me.Requery

Exit_Sauvegarder_Click:
Exit Sub

Err_Sauvegarder_Click:
MsgBox Err.Description
Resume Exit_Sauvegarder_Click

End Sub


Or quand je coche une des cases le contrôle correspondant passe à 0 mais
le

formulaire principal revient sur le 1er enregisytrement et ne reste pas
sur

l'enregistrement en cours.
Comment rester sur cet enregistrement en cours pour bien vérifier la
nouvelle valeur du contrôle et sa prise en compte dans un calcul
récapitulatif ?

Merci de votre aide

A+

c15




Avatar
C15
Bonjour Raymond,

Cela marche effectivement ; j'y avais pensé, mais sans doute mal appliqué.

Merci de ta réponse

A+

c15


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

essaie Me.Refresh
"
La méthode Refresh effectue une mise à jour immédiate des enregistrements
de

la source d'enregistrements sous-jacente d'un formulaire ou d'une feuille
de

données spécifié(e), de manière à tenir compte de vos modifications et de
celles des autres utilisateurs dans un environnement multi-utilisateur
"
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"C15" a écrit dans le message de
news:3f8cecf0$0$15439$
Bonjour à tous et toutes,

J'ai un formulaire contenant 2 sous-formulaires.
Dans un de ceux-ci j'ai une case à cocher qui fait passer un contrôle du
même formulaire à 0 :

Private Sub Payée_Click()
Me.Montant.Value = 0
Me.Requery
End Sub


Dans le formulaire principal, j'ai mis un bouton "Sauvegarder" pour
valider

les saisies :

Private Sub Sauvegarder_Click()
On Error GoTo Err_Sauvegarder_Click

DoCmd.RunCommand acCmdSaveRecord
Me.F_Année_Assemblée_1.Locked = True
Me.T_Cotisations_par_année_sous_formulaire.Locked = True
Me.Requery

Exit_Sauvegarder_Click:
Exit Sub

Err_Sauvegarder_Click:
MsgBox Err.Description
Resume Exit_Sauvegarder_Click

End Sub


Or quand je coche une des cases le contrôle correspondant passe à 0 mais
le

formulaire principal revient sur le 1er enregisytrement et ne reste pas
sur

l'enregistrement en cours.
Comment rester sur cet enregistrement en cours pour bien vérifier la
nouvelle valeur du contrôle et sa prise en compte dans un calcul
récapitulatif ?

Merci de votre aide

A+

c15