Discussion :

[Tatoine]

bonjour
voici le problème du jour:

j'ai deux zones de texte.
une zone Matricule et une nom.
elles sont indépendantes (car j'effectue des recherches a partir de ces mêmes zones)

j'ai un table habilitation avec matricule et nom comme champ.

Je souhaite que lorsque je tape le nom d'un agent dans ma zone de texte nom, je récupère son matricule dans la zone de texte matricule.

Je passe donc pas un DLookUp

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub netuser_Click()
On Error GoTo Err_netuser_Click
 
Me.Matricule = DLookup("[habilitation.matricule]", "[habilitation]", "[habilitation.nom] =" _
     & Me.nom)
 
Exit_netuser_Click:
    Exit Sub
 
Err_netuser_Click:
    MsgBox Err.Description
    Resume Exit_netuser_Click
 
End Sub

Problème: ça m'ouvre un MsgBox " Opération annulée"

premiere question: d'où vient l'erreur? (de mon Me.nom ?)
deuxieme question: comment la corriger ?

merci jeunes gens!

[BaRonm3]

Salut,

Regarde la http://access.developpez.com/faq/?page=TAZdt#RenvVal

A la place de ta zone de texte tu auras une liste modifiable, j'espére que sa te conviendra

[Tatoine]

justement non....ca ne me convient pas
je souhaite que ca soit une zone de texte (car elle me sert pour autre chose)

mais merci quand même !

[Dolphy35]

Salut,

As-tu esseyé en modifiant le nom de ta zone de liste car il doit y avoir un conflit même nom entre table et champs.

[Trini]

Bonjour,

Regardes si ça vient pas de l'utilisation des crochets, plutôt cela

Code :

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

1
2
 
[habilitation].[matricule]

Et pis si habilitation.nom est de type texte tu dois ajouter les quotes.
Et pis d'ailleurs tu n'as pas de besoin de repréciser le nom de la table sur chaque champ dans ce cas.
Essaies avec ça :

Code :

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

1
2
3
4
 
 
Me.Matricule = DLookup("[matricule]", "[habilitation]", "[nom] ='" _
     & Me.nom & '")

Salut,

[Petogaz]

heu Trini une erreur s'est glisser dans ton code. la derniere quote simple doit se positionner après les doubles quotes et non pas l'inverse.
correction :

Code :

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

1
2
Me.Matricule = DLookup("[matricule]", "[habilitation]", "[nom] ='" _
     & Me.nom & "')

[User]

le code de Petogaz:

Code :

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

1
2
Me.Matricule = DLookup("[matricule]", "[habilitation]", "[nom] ='" _
     & Me.nom & "'")

[Petogaz]

hé oui User tu as raison je suis allé un peu trop vite. je suis en même temps devant ma télé pour supporter les bleus.

[User]

Oui j'ai bien compris (pas évident de faire les 2) pas grand monde en ce moment sur le forum (alors allez les bleus )

[Trini]

Match entre 'quote' Petogaz/Trini : 1 partout

[Tatoine]

merci, ca marche.
je me suis encore fait avoir sur les cotes, guillemets et crochets!

rha!!! c'est tjs la même histoire!

mais merci bcp a tous!