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 :

Retrouver une valeur dans un champ en VBA


Sujet :

Access

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    47
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 47
    Points : 46
    Points
    46
    Par défaut Retrouver une valeur dans un champ en VBA
    Bonjour,

    J'ai une table intitulé "Machines". Dans cette table j'ai un champs qui s'appelle "hostname" (primaryKey) un autre qui s'appelle "Afeediag" . Dans le champs hostname j'ai un enregistrement appelé "MachineTest" . le champ Afeediag est a oui ou non .

    Je voudrais, en cliquant sur un bouton (dans un formulaire), lancer un test pour savoir si le champs "Afeediag" de l'enregistrement "MachineTest" est a oui ou non.
    Si il est a oui, je lance un bout de code, et si il est a non je lance un autre bout de code.


    Je pensé lancé dans un premier temps une commande SQL:

    SQL = "SELECT Afeediag FROM Machines WHERE 'MachineTest';"

    Puis il me faut la phase de test: ....


    et enfin je finirai avec un IF then et Else...

    Avez-vous des idées de comment je pourrais faire?


    Merci d'avance

    Frédéric

  2. #2
    Membre du Club Avatar de Badboy62cfp
    Inscrit en
    Mai 2005
    Messages
    109
    Détails du profil
    Informations personnelles :
    Âge : 40

    Informations forums :
    Inscription : Mai 2005
    Messages : 109
    Points : 58
    Points
    58
    Par défaut
    Essaye avec une condition...
    If.....Then...Else...

  3. #3
    Rédacteur/Modérateur

    Avatar de Heureux-oli
    Homme Profil pro
    Contrôleur d'industrie
    Inscrit en
    Février 2006
    Messages
    21 087
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 59
    Localisation : Belgique

    Informations professionnelles :
    Activité : Contrôleur d'industrie
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Février 2006
    Messages : 21 087
    Points : 42 926
    Points
    42 926
    Par défaut
    Ca c'est un titre

    Commence par le If Then Else qui est le test logique pour connaître la valeur de ton champ.
    Je pense qu'il vaut mieux la tester avant.
    J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ?
    Débutez en VBA

    Mes articles


    Dans un MP, vous pouvez me dire que je suis beau, ... mais si c'est une question technique je ne la lis pas ! Vous êtes prévenus !

  4. #4
    Membre du Club
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    47
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 47
    Points : 46
    Points
    46
    Par défaut comment récupérer la valeur...
    En fait, je sais utiliser IF...Then et Else.

    Je sais pas trop comment faire pour tester la valeur d'afeediag a oui ou a non.
    Voila ce que j'ai écrit mais ça marche pas.

    ##################mon code###################

    SQL = "SELECT Afeediag FROM Machines WHERE 'YO4';"

    If [Afeediag] = False Then

    'j'écris ma parti de code qui fonctionne déja

    End if
    Else

    'j'écris l'autre parti de mon qui fonctionne déja

    End Sub

    ##################mon code###################

  5. #5
    Membre éclairé Avatar de stéphane_ais2
    Profil pro
    Inscrit en
    Septembre 2004
    Messages
    792
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2004
    Messages : 792
    Points : 891
    Points
    891
    Par défaut
    Salut,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    If Me.Affediag.Value = 0 Then 'Non
            ......
        Else 'Oui
            .......
        End If
    où Affediag est le nom du contrôle...

    SE
    Si le monde explose, la dernière voix audible sera celle d’un expert, disant que la chose est impossible. - P. Ustinov

  6. #6
    Expert éminent

    Avatar de Maxence HUBICHE
    Homme Profil pro
    Développeur SQLServer/Access
    Inscrit en
    Juin 2002
    Messages
    3 842
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 55
    Localisation : France, Val d'Oise (Île de France)

    Informations professionnelles :
    Activité : Développeur SQLServer/Access

    Informations forums :
    Inscription : Juin 2002
    Messages : 3 842
    Points : 9 197
    Points
    9 197
    Par défaut
    Faudrait penser à faire des recherches de temps en temps !
    Ca fait plusieurs fois, AUJOURD'HUI, qu'on répond à ce genre de question...

    Regardes donc du côté de la fonction DLookup (ou RechDom)
    Tu peux aussi passer par un recordset.

  7. #7
    Membre du Club
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    47
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 47
    Points : 46
    Points
    46
    Par défaut Merci
    Merci a tous pour votre aides

    Désolé pour le titre...et j'aurais du faire des recherches...

    @+

    Fredo l'étudiant débutant...

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

Discussions similaires

  1. [Tableaux] retrouver une valeur dans un tableau
    Par tininou dans le forum Langage
    Réponses: 3
    Dernier message: 26/01/2007, 22h04
  2. Réponses: 4
    Dernier message: 07/09/2006, 15h02
  3. Réponses: 5
    Dernier message: 24/05/2006, 14h04
  4. Renvoi d'une valeur dans un champ avec un style
    Par m@thieu dans le forum Général JavaScript
    Réponses: 2
    Dernier message: 15/11/2005, 18h09
  5. Conserver une valeur dans un champs
    Par zakfa dans le forum IHM
    Réponses: 5
    Dernier message: 04/10/2004, 08h48

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