Discussion :

[Aladin_23]

Bonsoir le forum
J' ai deux requetes qui m' affichet chacun un resultat. Comment faire un calcul en vba et de l' affichele resultat dans un champ texte
exemple Req_toto-Re_toto1
Merci d' avance pour toute aide pour la transposition en vba
Aladin

[Aladin_23]

Bonsoir le forum
J' ai contourné et résolu le pb de calcul au sein de la requete, en me basant sur un formulaire. Mais j' ai un souci de calcul sur un champ vide
exemple texte3 = [exte4]-[texte5] le pb c' est que si Texte5 n' a aucune valeur
le résultat est nul

Aladin

[nico84]

Bonjour,

On doit pouvoir faire :

Code :

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

x = nz(dlookup("champ1","requete1"),0)- nz(dlookup("champ2","requete2"),0)

[nonopower]

Tu pourrais essayer de passer par des variables en ADO:

'Dim cnn As ADODB.Connection
'Set cnn = CurrentProject.Connection
'
'Dim rst As New ADODB.Recordset

rst1=rst.open"Select........"
rst.close

rst2=rst.open"select........"
rst.close
cnn.close

msgbox(rst1-rst2)



Bonne soirée

[Aladin_23]

Bonsoir nonopower et nico84 et le forum
Merci a tous les deux d' avoir répondu, et je ferais le test de vos réponses sur un autre formulaires. Mais j' ai adopté une autre solution pour mon calcul et le test est ok
Mais j' ai un autre pb sur mon formulaire, lorsque j ecris dans in champ independant texte3 = [exte4]-[texte5] le pb c' est que si Texte5 n' a aucune donné le champ Texte3 reste vide.
Comment peut faire pour que le calcul se fasse meme si un des champs soit vide
Aladin

[Aladin_23]

Bonsoir nonopower et nico84 et le forum
J' ai adapté la solution de nico84 et le tes est Ok
Merci a vous deux
Aladin

[nico84]

lorsque j ecris dans in champ independant texte3 = [exte4]-[texte5] le pb c' est que si Texte5 n' a aucune donné le champ Texte3 reste vide.
Comment peut faire pour que le calcul se fasse meme si un des champs soit vide
Aladin

C'est à ça que servent les 2 Nz(...,0)