OVH Cloud OVH Cloud

Code afterupdate

10 réponses
Avatar
Daniel
Bonsoir
Dans le code il y à des erreurs mais je ne sais pas ou


Voilà le code:
Private Sub IdProduit_AfterUpdate()
Dim var As Variant
var = DLookup("[Pa]", "rq_produitprix", "[Pa]=Left([IdProduit],2)")
[IdProduit] = var
End Sub

En faite je veux afficher dans un formulaire les champs de ma rq_produitprix
le IdProduit et que son Pa se loge dans la colonne à côté
Le formulaire est construit mais le Pa se loge pas encore

rq_produitprix

Champ: IdProduit
Table: tbl_detailbulletin
Critère: Regroupement
Champ: PA
Table: tbl_detailbulletin
Critère: Max

--
Merci à tous de votre aide toujours fort apprécié
Daniel

10 réponses

Avatar
Daniel
Malheureusement cela fonctionne pas encore.
Que veut dire sans avis sur la méthode et l'usage?
Tu as une autre idée?
--
Merci à tous de votre aide toujours fort apprécié
Daniel



Salut,

"Daniel"
| Private Sub IdProduit_AfterUpdate()
| Dim var As Variant
| var = DLookup("[Pa]", "rq_produitprix", "[Pa]=Left([IdProduit],2)")
| [IdProduit] = var
| End Sub



sans avis sur la méthode et l'usage...


essaies ceci :

var = DLookup("[Pa]", "rq_produitprix", "[Pa]=" & Left([IdProduit],2))


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/





Avatar
3stone
re,

"Daniel"
| Malheureusement cela fonctionne pas encore.


PA est de type texte dans ce cas ?

var = DLookup("[Pa]", "rq_produitprix", "[Pa]='" & Left([IdProduit],2) & "'" )


la fin à la loupe :
"[Pa]=' " & Left([IdProduit],2) & " ' " )


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Daniel
Non il est de type monétaire
--
Merci à tous de votre aide toujours fort apprécié
Daniel



re,

"Daniel"
| Malheureusement cela fonctionne pas encore.


PA est de type texte dans ce cas ?

var = DLookup("[Pa]", "rq_produitprix", "[Pa]='" & Left([IdProduit],2) & "'" )


la fin à la loupe :
"[Pa]=' " & Left([IdProduit],2) & " ' " )


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/




Avatar
3stone
re,

"Daniel"
| Non il est de type monétaire

Donc numérique...
Mais, qu'est ce qui "ne fonctionne pas" ?

var = DLookup("[Pa]", "rq_produitprix", "[Pa]=" & Left([IdProduit],2))

car ici tu cherche [Pa] qui représente les 2 premiers chiffres de idProduit.
Essaies pour voir en remplacant left(idProduit,2) par une valeur en dur...

"[Pa]V"

par exemple. Cela fonctionne ?


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Daniel
alors effectivement il y à un gros problème....
je le pas du produit!
exemple quand je sélectionne dans ma liste déroulante de IdProduit
(IdProduit étant le nom du champ mais dans la liste se trouve des
carottes-des tomates-des pommes...) des tomates le pa associé est SFR.1.80

--
Merci à tous de votre aide toujours fort apprécié
Daniel



re,

"Daniel"
| Non il est de type monétaire

Donc numérique...
Mais, qu'est ce qui "ne fonctionne pas" ?

var = DLookup("[Pa]", "rq_produitprix", "[Pa]=" & Left([IdProduit],2))

car ici tu cherche [Pa] qui représente les 2 premiers chiffres de idProduit.
Essaies pour voir en remplacant left(idProduit,2) par une valeur en dur...

"[Pa]V"

par exemple. Cela fonctionne ?


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/




Avatar
3stone
re,

"Daniel"
| alors effectivement il y à un gros problème....
| je le pas du produit!


c'est ce que j'entendais par :
"sans avis sur la méthode et l'usage..." ;-)


| exemple quand je sélectionne dans ma liste déroulante de IdProduit
| (IdProduit étant le nom du champ mais dans la liste se trouve des
| carottes-des tomates-des pommes...) des tomates le pa associé est SFR.1.80

si IdProduit est une liste, je ne voit pas à quoi devrait servir code...

Private Sub IdProduit_AfterUpdate()
Dim var As Variant
var = DLookup("[Pa]", "rq_produitprix", "[Pa]=Left([IdProduit],2)")
[IdProduit] = var
End Sub

code qui équivant à :
IdProduit = DLookup("[Pa]", "rq_produitprix", "[Pa]=Left([IdProduit],2)")

Mais je ne vois pas ce que tu cherche à faire et à obtenir.


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Daniel
Je cherche à valoriser mon inventaire...

Ceci est ma tbl_detailinventaire sous-formulaire
Quantite Unité IdProduit Pa DatePa Date
10 150 cl Acetosa 26-mars-06

En faite je pensai par la suite faire une requête pour valoriser mon
inventaire à savoir
Quantite*Pa




--
Merci à tous de votre aide toujours fort apprécié
Daniel



re,

"Daniel"
| alors effectivement il y à un gros problème....
| je le pas du produit!


c'est ce que j'entendais par :
"sans avis sur la méthode et l'usage..." ;-)


| exemple quand je sélectionne dans ma liste déroulante de IdProduit
| (IdProduit étant le nom du champ mais dans la liste se trouve des
| carottes-des tomates-des pommes...) des tomates le pa associé est SFR.1.80

si IdProduit est une liste, je ne voit pas à quoi devrait servir code...

Private Sub IdProduit_AfterUpdate()
Dim var As Variant
var = DLookup("[Pa]", "rq_produitprix", "[Pa]=Left([IdProduit],2)")
[IdProduit] = var
End Sub

code qui équivant à :
IdProduit = DLookup("[Pa]", "rq_produitprix", "[Pa]=Left([IdProduit],2)")

Mais je ne vois pas ce que tu cherche à faire et à obtenir.


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/





Avatar
3stone
re,

"Daniel"
| Je cherche à valoriser mon inventaire...
|
| Ceci est ma tbl_detailinventaire sous-formulaire
| Quantite Unité IdProduit Pa DatePa Date
| 10 150 cl Acetosa 26-mars-06
|
| En faite je pensai par la suite faire une requête pour valoriser mon
| inventaire à savoir
| Quantite*Pa


heu... valoriser... et Pa...

et avec des mots simples pour un neuneu, ca fait quoi ?

;-)


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Daniel
je saisi un inventaire physique (10 kg tomates qui ont un Pa(prix achat) de
SFR.3.80
dans ma tbl_detailinventaire puis je fais une requête qui me permet de
connaître l'inventaire final en monétaire (Sfr)pour une période.
10*3.808.-- au 01.04.2006
--
Merci à tous de votre aide toujours fort apprécié
Daniel



re,

"Daniel"
| Je cherche à valoriser mon inventaire...
|
| Ceci est ma tbl_detailinventaire sous-formulaire
| Quantite Unité IdProduit Pa DatePa Date
| 10 150 cl Acetosa 26-mars-06
|
| En faite je pensai par la suite faire une requête pour valoriser mon
| inventaire à savoir
| Quantite*Pa


heu... valoriser... et Pa...

et avec des mots simples pour un neuneu, ca fait quoi ?

;-)


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/




Avatar
Daniel
Ok tout est réglé par une très simple requête qui fonctionne maintenant. De
plus j'ai enlevé le champ pa dans ma tbl_detailinventaire qui n'avait rien à
faire là!
En tous cas merci de votre aide et sûrement à très bientôt
Désolé pour les dérangements
--
Merci à tous de votre aide toujours fort apprécié
Daniel



je saisi un inventaire physique (10 kg tomates qui ont un Pa(prix achat) de
SFR.3.80
dans ma tbl_detailinventaire puis je fais une requête qui me permet de
connaître l'inventaire final en monétaire (Sfr)pour une période.
10*3.808.-- au 01.04.2006
--
Merci à tous de votre aide toujours fort apprécié
Daniel



re,

"Daniel"
| Je cherche à valoriser mon inventaire...
|
| Ceci est ma tbl_detailinventaire sous-formulaire
| Quantite Unité IdProduit Pa DatePa Date
| 10 150 cl Acetosa 26-mars-06
|
| En faite je pensai par la suite faire une requête pour valoriser mon
| inventaire à savoir
| Quantite*Pa


heu... valoriser... et Pa...

et avec des mots simples pour un neuneu, ca fait quoi ?

;-)


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/