Discussion :

[Salsaboy60]

Bonsoir,

Dans un formulaire j'ai un champs calculé que me renvoie le nombre de machines avec une equipement spécale. Ca fonctionne très bien sur le records qui sont rempli, mais quand j'arrive à une nouvelle encodage, le champs affice #Erreur.
Le code dans ce champs est

Code :

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

=nz([tblMachines sous-formulaire].[Formulaire]![Hoeveelheid])

Pourquoi ceci ne fonctionne pas?

Merci pour vos remarques.

Hans

[alassanediakite]

Saut
J'ai de la peine à comprendre

Code :

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

[tblMachines sous-formulaire].[Formulaire]![Hoeveelheid]

.
j'ai l'habitude de voir

Code :

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

formulaires!nomformulaire!nomchamp

ou

Code :

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

forms!nomformulaire!nomchampcontenantsourformulaire.form!nomchampsdans sousformulaire

Mais pour remédier à ton problème tu peux passer par un fonction declarée "public", dans un module indépendant:

Code :

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

1
2
3
4
5
6
public function mafonction() as variant
on error resume next
dim mavariable
mavariable=[tblMachines sous-formulaire].[Formulaire]![Hoeveelheid]
mafonction=mavariable
end function

Et ton champs aura comme source "=mafonction()"

[Salsaboy60]

Bonsoir,

Merci pour ton idee. Seulement, je ne suis pas très à l'aise avec ces genres d'opération.

J'ai encodé ceci :

Code :

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

1
2
3
4
5
6
Public Function NulVoorkomen() As Variant
On Error Resume Next
Dim mavariable
mavariable = Forms!frmMachines![frmMachines sous-formulaires].[Formulaire]![Hoeveelheid]
NulVoorkomen = mavariable
End Function

Est-ce que c'est comme ça qu'on doit appeler un control dans une sous formulaire?

Maintenant je n'ai plus d'erreur, mais plus résultat non plus.

Sous sourcecontrol j'appele donc ma fonction sans les " ". Est-ce que c'est correct?

Hans

[User]

Salut,

ton champs [Hoeveelheid] dans ton sous formulaire c'est un champs calculé ?
si oui c'est quoi exactement comme champ calculé ?

[Salsaboy60]

Bonsoir,

Oui, effectivement c'est un champ calculé. Via un Sql dans la source du Formulaire je soustrait d'un table Machines les champs Platform et Hoeveelheid (donc Qte) et je fait une Somme sur Hoeveelheid.

Code :

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

SELECT tblMachines.Platform, Sum(tblMachines.Hoeveelheid) AS SommeDeHoeveelheid FROM tblMachines GROUP BY tblMachines.Platform HAVING (((tblMachines.Platform)=[Formulaires]![frmMachines]![lstPlatform]));

avec donc comme condition que la Platform est celui qui 's-affiche dans le formulaire principale.

H.

[User]

Tu peux enregistrer le sql de ton sous form dans une requête ("TaRequete") et après utiliser la fonction rechercheDom sur ton champs:

Code :

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

=RechDom("SommeDeHoeveelheid";"TaRequete";"Platform='" & [Platform] & "'")

A+

[Salsaboy60]

Merci bcp.

Comme ceci ça marche impèc. Je ne comprends pas encore pourquoi, mais le résultat est là.

Merci encore;

Hans