IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Access Discussion :

changement d'enregistrement via liste déroulante


Sujet :

Access

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    23
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 23
    Points : 11
    Points
    11
    Par défaut changement d'enregistrement via liste déroulante
    Quand je choisis une valeur dans la liste déroulante, l'enregistrement dans le formulaire doit correspondre à la valeur sélectionnée dans cette liste. ça fonctionne très bien quand j'ai un champs texte mais pas pou rune date.
    J'ai essayé pas mal de possibilité et rien ne va.
    J'ai déjà regardé dans les tutoriels et je ne trouve de solution.

    voici le code utilisé:

    Code:
    Private Sub liste_date_AfterUpdate()
    ' Rechercher l'enregistrement correspondant au contrôle.

    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[debabs] = " & Chr(35) & Format(Me![liste_date], "dd/mm/yyyy") & Chr(35)
    Me.Bookmark = rs.Bookmark

    End Sub

  2. #2
    Membre éclairé
    Avatar de Didier L
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Juillet 2004
    Messages
    503
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Consultant informatique

    Informations forums :
    Inscription : Juillet 2004
    Messages : 503
    Points : 806
    Points
    806
    Par défaut
    Bonsoir,

    Merci de penser aux balises de code

    essaye cela :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Set rs = Me.Recordset.Clone 
    rs.FindFirst "[debabs] = " & Chr(35) & Format(Me![liste_date], "mm/dd/yyyy") & Chr(35) 
    Me.Bookmark = rs.Bookmark
    Peut être que FindFirst attent une date sous le format anglo saxon?
    @+


    Pensez au tag

  3. #3
    Membre à l'essai
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    23
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 23
    Points : 11
    Points
    11
    Par défaut cool ça fonctionne
    merci didier, ça marche impeccable.
    J'avais essayé tout à l'heure mais pas avec le bon format.

    bonne soirée.

  4. #4
    Membre éclairé
    Avatar de Didier L
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Juillet 2004
    Messages
    503
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Consultant informatique

    Informations forums :
    Inscription : Juillet 2004
    Messages : 503
    Points : 806
    Points
    806
    Par défaut
    Si c'est résolu, merci de penser au tag en bas à gauche
    @+


    Pensez au tag

Discussions similaires

  1. Tri dans tableau html via liste déroulante
    Par guispider dans le forum Langage
    Réponses: 7
    Dernier message: 18/02/2009, 17h31
  2. [E-03] Image via liste déroulante.
    Par Blop le bricoleur dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 06/10/2008, 09h05
  3. Réponses: 1
    Dernier message: 05/06/2008, 08h02
  4. Réponses: 4
    Dernier message: 04/04/2007, 18h41
  5. Passer paramètres via liste déroulante
    Par Jiraiya42 dans le forum Langage
    Réponses: 8
    Dernier message: 01/04/2007, 11h15

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo