Discussion :

[Smint]

Bonjour la communauté,

Dans un gros formulaire, j'utilise des sous-formulaires, des sous-sous-formulaires via des onglets.

Le problème est que, en cas de création d'une fiche, dans un sous-formulaire, je voudrais qu'une partie des données que je viens de saisir s'affichent dans les sous-sous formulaires correspondant mais ça ne fonctionne soit en fermant et ré-ouvrant le formulaire global, soit en passant sur un autre enregistrement et en revenant...

Pour résoudre le problème, il y a quelques temps, l'un d'entre-vous m'a fait écrire le code suivant, posé en évènement clic sur un bouton du formulaire global, mais ça ne fonctionne pas...:

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Mise_à_jour_Click()
On Error GoTo Err_Mise_à_jour_Click
    DoCmd.RunCommand acCmdSaveRecord
Exit_Mise_à_jour_Click:
    Exit Sub
Err_Mise_à_jour_Click:
    MsgBox Err.Description
    Resume Exit_Mise_à_jour_Click
End Sub

J'ai aussi essayé de placer un bouton avec le même code sur le sous-formulaire dans lequel je saisi mes données, mais c'est pareil... Le message "traitement" s'affiche bien, brièvement, dans la barre d'état mais quand je passe dans le sous-formulaire, l'affichage de ces fameuses données ne s'effectue pas...

Quelqu'un voit-il ce qu'il faudrait faire...?

Merci beaucoup!

[Heureux-oli]

As-tu essayé ?

Code :

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

1
2
 
[MonSousFormulaire].Requery

[Smint]

Salut Heureux-oli, le forum,

Merci de ta réponse. Voudrais-tu me dire où insérer ce code? A l'intérieur du code que je cite? A sa place?
Je suis nul en VBA, mes compétences en ce domaine sont plus ou moins limitées au copier/coller...
Merci beaucoup....

Bonne journée à tous!

[Smint]

De retour après quelques essais...

J'ai inséré ta ligne de code comme ça:

Code :

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

1
2
 [Projets].Requery
    DoCmd.RunCommand acCmdSaveRecord

Ca fonctionne! Thx!!

Bonne continuation tout le monde....