bonjour,
Je voudrais afficher les coordonnées d'une entreprise en double cliquant sur le champ Filiale1.
Le texte saisie dans Filiale1 ne correspond pas toujours entièrement à Nom
Il y a parfois des erreurs de saisie ou autres (exemple : Filiale1 = ETS TOTO et Nom = TOTO)
Il faut que je fasse une recherche avec une partie du mot.
J'y arrive pour me.filiale1 (voir 1er code) mais pas pour T_entreprise.nom (voir 2ème code).
J'ai essayé :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub FILIALE1_DblClick(Cancel As Integer) Dim STR As String STR = "SELECT * FROM T_Entreprise WHERE (T_Entreprise.NOM LIKE '*" & Me.FILIALE1 & "*'" Forms("f_entreprise").RecordSource = STR End Sub
avec le code ci dessus il ne se passe rien...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub FILIALE1_DblClick(Cancel As Integer) Dim STR As String STR = "SELECT * FROM T_Entreprise WHERE (((T_Entreprise.NOM) Like '*" & Me.FILIALE1 & "*')) OR (((Me.FILIALE1) Like '*" & T_Entreprise.NOM & "*'))" Forms("f_entreprise").RecordSource = STR End Sub
Merci d'avance pour votre aide
Mamanhou
Partager