Discussion :

[edonis]

Bonjour a tous,
Je sèche un petit problème qui me prend la tête.

Lorsque je met à jour le sous formulaire un calcul est récupéré dans le formulaire principale.
Mais lorsque le calcul 'RestantDu'(voir code en bas) doit s'effectuer 'TtRegl' n'est pas encore à jour ???
Ce qui est encore plus fort, c'est que '[TTRègl.] à la bonne valeur à jour mais pas 'TtRegl !!!!!
J'ai inséré en dessous ma prose.
Quelqu'un peut-il m'aider ?
Merci d'avance

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Dim RestantDu As Integer
'Récupération du contenu des champs calculés dans un formulaire
TtRegl = Forms!F_ClientsDossier!S_F_ClientsDossier !S_F_ClientsFactures![TT Règl.]
TTC = Forms!F_ClientsDossier!S_F_ClientsDossier!S_F_ClientsFactures![Total TTC]
'Calcul
RestantDu = TTC - TtRegl
'Action suivant le RestantDu
If RestantDu = 0 Then
Forms!F_ClientsDossier!S_F_ClientsDossier!S_F_ClientsFactures![Payé] = -1
End If
If RestantDu <> 0 Then
Forms!F_ClientsDossier!S_F_ClientsDossier!S_F_ClientsFactures![Payé] = 0

[mout1234]

Bonsoir,

Je ne suis pas sur d'avoir bien compris ton problème. Notamment ,si Ttregl est une variable (je suppose )... ou un champ...



En tout cas ... tu cherches visiblement à atteindre dans un sous -sous -formulaire ... c'est ça ?

Dans ce cas la syntaxe devrait être :

Code :

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

TtRegl = Forms!F_ClientsDossier!S_F_ClientsDossier.form!S_F_ClientsFactures!.form[TT Règl.]

Rappel:

• Forms
  = collection des formulaires ouverts
• Forms!F_ClientsDossier
  = un des formulaires (supposé ouvert)
• Forms!F_ClientsDossier!S_F_ClientsDossier
  = le contrôle contenant un sous formulaire
• Forms!F_ClientsDossier!S_F_ClientsDossier.form
  = le sous-formulaire

...



EDIT: Par curiosité j'ai refait quelques tests... Visiblement les versions récentes (Access 2007 au moins, peut être avant...) sont plus tolérantes sur la syntaxe .

Si la syntaxe rappelée ci-dessus reste la bonne, il accepte également des syntaxes raccourcies (notamment en ne mentionnant pas la propriété .form).
Il s'agit sans doute des effets de propriétés par défaut ....
Je continue toutefois de conseiller l'utilisation de la syntaxe complète


bon dev

[bernardmichel]

Ne serait-ce pas un simple Recalc dont tu as besoin (en plus de l'apport de Mout) ?

Code :

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

1
2
3
4
5
Dim RestantDu As Integer

Me.Recalc
 'Récupération du contenu des champs calculés dans un formulaire
TtRegl = Forms!F_ClientsDossier!S_F_ClientsDossier.Form!S_F_ClientsFactures!.Form[TT Règl.]

[edonis]

Merci beaucoup a tous les deux pour vos informations.

La solution était la fonction 'Me.Recalc'
Il est exact qu'il est difficile d'expliquer simplement et clairement les imbrications de plusieurs formulaires et sous formulaires dans une logique qui n'est pas toujours évidente mais qui répond à un besoin précis.

Merci pour votre aide