J'ai plusieurs liste modifiable avec lesquelles je s=E9lectionne
plusieurs crit=E8res, mais le soucis c'est que je n'arrive pas =E0
afficher le r=E9sultat de ma requ=EAte dans une zone de texte. En gros je
souhaiterais que quand je selectionne le dernier crit=E8re il me
remplisse ma zone de texte. je sais que je dois lancer ma requ=EAte sur
ma derni=E8re liste modifiable (apr=E8s update).
Quelqu'un peut-il m'aider =E0 afficher ce r=E9sultat dans ma zone de
texte?
Merci beaucoup par avance =E0 tous
Cordialement
DAMS
"Fabien" [...] | Dans VBA le séparatif c'est la , et pas le ; | Texte6=RechDom("[Champ4]","Table1","[Champ1]=" [Me].[Modifiable0]) oui, mais aussi Dlookup() serait mieux ;-) Yes ! sir ! :-)
Je ne comprends toujours pas, j'ai marqué cela dans mon code VBA:
Private Sub Modifiable4_AfterUpdate() Dim toto As String toto = DLookup("[Champ4]", "Table1", "[Champ1]=" & Me.[Modifiable0]) Me.Texte8 = toto End Sub et il me dit :erreur d'execution 2001 opératoin annulée Merci pour votre aide Cordialement DAMS On va y arriver !!!
toto = nz(DLookup("[Champ4]", "Table1", "[Champ1]=" & Me.[Modifiable0]),"") 'Parceque si le dlookup ne retourne rien tu obtient la valeur Null. Ensuite ton champ1 est de quel nature : alpha ou numerique ? S'il est alpha : "[Champ1]='" & Me.[Modifiable0]) & "'" devrait mieux fonctionner A toi ...- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
cela fonctionne, je vous remercie beaucoup. merci encore Cordialement DAMS
De rien.
Bonne continuation et a bientôt ...
On 7 nov, 15:10, Fabien <UrbaniakFabienxx...@Neuf.fr> wrote:
On 7 nov, 13:47, Fabien <UrbaniakFabienxx...@Neuf.fr> wrote:
3stone a écrit :> Salut,
"Fabien"
[...]
| Dans VBA le séparatif c'est la , et pas le ;
| Texte6=RechDom("[Champ4]","Table1","[Champ1]=" [Me].[Modifiable0])
oui, mais aussi Dlookup() serait mieux ;-)
Yes ! sir ! :-)
Je ne comprends toujours pas, j'ai marqué cela dans mon code VBA:
Private Sub Modifiable4_AfterUpdate()
Dim toto As String
toto = DLookup("[Champ4]", "Table1", "[Champ1]=" & Me.[Modifiable0])
Me.Texte8 = toto
End Sub
et il me dit :erreur d'execution 2001
opératoin annulée
Merci pour votre aide
Cordialement
DAMS
On va y arriver !!!
toto = nz(DLookup("[Champ4]", "Table1", "[Champ1]=" &
Me.[Modifiable0]),"") 'Parceque si le dlookup ne retourne rien tu
obtient la valeur Null.
Ensuite ton champ1 est de quel nature : alpha ou numerique ?
S'il est alpha : "[Champ1]='" & Me.[Modifiable0]) & "'" devrait mieux
fonctionner
A toi ...- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
cela fonctionne, je vous remercie beaucoup.
merci encore
Cordialement
DAMS
"Fabien" [...] | Dans VBA le séparatif c'est la , et pas le ; | Texte6=RechDom("[Champ4]","Table1","[Champ1]=" [Me].[Modifiable0]) oui, mais aussi Dlookup() serait mieux ;-) Yes ! sir ! :-)
Je ne comprends toujours pas, j'ai marqué cela dans mon code VBA:
Private Sub Modifiable4_AfterUpdate() Dim toto As String toto = DLookup("[Champ4]", "Table1", "[Champ1]=" & Me.[Modifiable0]) Me.Texte8 = toto End Sub et il me dit :erreur d'execution 2001 opératoin annulée Merci pour votre aide Cordialement DAMS On va y arriver !!!
toto = nz(DLookup("[Champ4]", "Table1", "[Champ1]=" & Me.[Modifiable0]),"") 'Parceque si le dlookup ne retourne rien tu obtient la valeur Null. Ensuite ton champ1 est de quel nature : alpha ou numerique ? S'il est alpha : "[Champ1]='" & Me.[Modifiable0]) & "'" devrait mieux fonctionner A toi ...- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
cela fonctionne, je vous remercie beaucoup. merci encore Cordialement DAMS