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

VBA Access Discussion :

Atteindre un enregistrement via un bouton [AC-2016]


Sujet :

VBA Access

  1. #1
    Membre à l'essai
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2018
    Messages
    28
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Mai 2018
    Messages : 28
    Points : 17
    Points
    17
    Par défaut Atteindre un enregistrement via un bouton
    Bonjour à tous.

    Dans le cadre d'un travail à effectuer pour mon entreprise, je dois effectuer des modifications sur un fichier Access.
    La tâche paraît de prime abord assez simple. Je dois tout simplement, par le biais d'un champ texte et d'un bouton, sélectionner l'enregistrement se trouvant dans mon formulaire qui correspond à se que j'ai dans mon Txt.
    Nom : capture_formulaire.PNG
Affichages : 133
Taille : 28,5 Ko
    Ce que je souhaite faire, concrètement, c'est de taper le numéro d'un chassis, et qu'une fois le bouton de recherche cliqué, je souhaite que la ligne contenant le chassis soit sélectionnée.
    J'ai regarder durant 3h ce matin pour essayé de résoudre ce problème mais tout ce que j'ai essayé ne fonctionne pas. Je n'ai eu que des messages d'erreurs.
    J'ai essayé avec un DoCmd.GotoRecord, avec un FindFirst, un FindRecord mais rien n'y fait.

    Les lignes d'enregistrement se trouvent dans la section "Détail" de mon formulaire.
    J'espère avoir été clair dans l'énoncé de mon problème.

    Merci pour vos futurs aides.

  2. #2
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 331
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 331
    Points : 23 786
    Points
    23 786
    Par défaut
    Bonjour.

    Voici ce que j'utilise dans ce cas, à mettre dans le code associé au bouton et à adapter à ta réalité,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    call me.recordset.FindFirst("NumEtiquette=" & me.txtRechercheEtiquette)
    me. représente le formulaire lui-même.

    Si l'enregistrement existe, il devient la 1ère ligne affichée et est sélectionné.
    Si il ne trouve pas, il me semble qu'il se met sur le nouvel enregistrement à la fin.

    A+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  3. #3
    Membre à l'essai
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2018
    Messages
    28
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Mai 2018
    Messages : 28
    Points : 17
    Points
    17
    Par défaut
    Bonjour marot_r, et merci pour ta réponse.

    J'ai essayé la ligne de code que tu m'as donné en l'adaptant à mon projet.
    L'erreur suivante apparaît sur la ligne ci-dessous :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Call Me.Recordset.FindFirst("N° de Chassis=" & Me.txtchassis)
    Nom : Capture_erreur_syntaxe.PNG
Affichages : 117
Taille : 4,9 Ko

    Une idée ?

  4. #4
    Expert éminent

    Homme Profil pro
    Inscrit en
    Mai 2012
    Messages
    3 840
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Madagascar

    Informations forums :
    Inscription : Mai 2012
    Messages : 3 840
    Points : 7 974
    Points
    7 974
    Par défaut
    Bonjour,

    Si le contenu est du texte, il faudrait l'encadrer avec des '
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Call Me.Recordset.FindFirst("N° de Chassis='" & Me.txtchassis a "'")
    Si le mot à chercher contient des apostrophes il faut mettre des " (qui est rare dans un mot)

    Cordialement.
    Mandresy
    "Je ne sais qu'une chose, c'est que je ne sais rien" Socrate

    N'oublions pas de mettre quand on a trouvé notre bonheur. Soyons sympa pour les futurs heureux.

    Merci, c'est toujours sympa de recevoir des de votre part

  5. #5
    Membre à l'essai
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2018
    Messages
    28
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Mai 2018
    Messages : 28
    Points : 17
    Points
    17
    Par défaut
    Bonjour madefemere et merci pour ta réponse.

    Malheureusement, les apostrophes ne suffisent pas à régler mon problème.
    Le même message d'erreur syntaxique apparaît.

  6. #6
    Membre régulier
    Homme Profil pro
    Inscrit en
    Mai 2013
    Messages
    62
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mai 2013
    Messages : 62
    Points : 97
    Points
    97
    Par défaut Atteindre un enregistrement via un bouton
    Bonjour,

    Mettre N° de Chassis entre crochet [N° de Chassis].

    Bonne journée.
    Cordialement

    Riton

  7. #7
    Membre à l'essai
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2018
    Messages
    28
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Mai 2018
    Messages : 28
    Points : 17
    Points
    17
    Par défaut
    Bonjour Riton.

    En effet, ce sont les crochets qu'il me manquait pour pouvoir bien sélectionner l'enregistrement désiré.
    Merci mille fois !
    Je vais pouvoir passer à mon problème suivant.
    Je remet la ligne de code finale pour aider ceux qui en auraient besoin.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Call Me.Recordset.FindFirst("[N° de Chassis]='" & Me.txtchassis & "'")
    Bonne journée à tous.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. enregistrement de données+date+secteur dans un onglet via un bouton
    Par lieutnant-col dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 12/11/2019, 15h20
  2. [XL-2003] Enregistrer des données textbox en excel via un bouton dans un userform
    Par buzzerbuc dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 12/10/2014, 13h57
  3. [AC-2003] Atteindre un enregistrement via une zone de texte
    Par Eshen dans le forum IHM
    Réponses: 2
    Dernier message: 06/05/2009, 14h29
  4. Réponses: 4
    Dernier message: 22/11/2006, 18h51
  5. Réponses: 17
    Dernier message: 02/02/2006, 22h31

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