Champ recherche dans access [Résolu]

Question

Champ recherche dans access [Résolu]

Signaler

cs_connect

Messages postés: 8
Date d'inscription: jeudi 19 décembre 2002
Statut: Membre
Dernière intervention: 18 octobre 2004

- 22 sept. 2004 à 15:09
cs_connect

Messages postés: 8
Date d'inscription: jeudi 19 décembre 2002
Statut: Membre
Dernière intervention: 18 octobre 2004

- 23 sept. 2004 à 14:28

bonjour je souhiaterais mettre dans un formuailre access un champ de recherche similaire au Ctrl+F de windows mais accessible directement sur ce formulaire avec en option
rechercher "n'importe ou dans le champ...

Merci d'avance

Afficher la suite

A voir également:

2 réponses

Réponse 2 / 2

cs_frop01

Messages postés: 1352
Date d'inscription: lundi 27 octobre 2003
Statut: Membre
Dernière intervention: 19 novembre 2008

1
22 sept. 2004 à 22:15

ca existe par défaut dans access

regarde l'assistant de création d'un formulaire et tu vas voir le résultat avec le CTRL + F

:-p [mailto:cyberscorp2004@msn.com MSN] :big) [mailto:frop01@yahoo.fr YAHOO] >:)

Membre du club CodeS-SourceS

Posez votre question

cs_connect · Accepted Answer · 2004-09-23T14:28:13+0200

Voici la solution proposé par frop01 et qui fonctionne à merveille !

creation d'un champ independant nommé ChampsRechercheFormulaire qui sur perte focus lance la recherche sur le premier enregistrement qui repond au critere renseigné
(en utilisant le principe de n'importe ou dans le champ)
puis un bouton appelé Commande120 qui lancera les resultat suivant


Private Sub ChampsRechercheFormulaire_LostFocus()
Dim rst As DAO.Recordset, entI As Integer
    Dim champ As Field

    Set rst = Me.Recordset
    rst.FindFirst "[Raison Sociale] like '*" & Me.ChampsRechercheFormulaire & "*'"
    
    

End Sub
---------------------------------------------------------------------------
Private Sub Commande120_Click()

   Dim rst As DAO.Recordset, entI As Integer
    Dim champ As Field

    Set rst = Me.Recordset
    rst.FindNext "[Raison Sociale] like '*" & Me.ChampsRechercheFormulaire & "*'"
    

End Sub
-------------------------------------------------------------------------

encore bravo et un grand merci !!

Votre réponse