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 :

Comment comparer la valeur d'une case à cocher? [AC-2007]


Sujet :

VBA Access

  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    205
    Détails du profil
    Informations personnelles :
    Localisation : France, Loir et Cher (Centre)

    Informations forums :
    Inscription : Juillet 2009
    Messages : 205
    Par défaut Comment comparer la valeur d'une case à cocher?
    * Bonjour *

    J'ai une case à cocher qui s'appele "option3" je veux vérifier qu'elle est cochée avec quel argument le faire : j'ai essayé avec "= vrai" mais cela ne donne rien quel est la bonne comparaison?
    Merci

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 684
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 684
    Par défaut
    salut,
    une case à cocher peut prendre deux valeurs :
    - True (cochée)
    - False (non cochée)
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel (3e édition)
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    205
    Détails du profil
    Informations personnelles :
    Localisation : France, Loir et Cher (Centre)

    Informations forums :
    Inscription : Juillet 2009
    Messages : 205
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    if "option3" = true then
        DoCmd.OpenForm "form entree"
        Forms![Form Entrée]![motif]="Ne réponds pas"
        DoCmd.Close acForm, "entree"
    Else 
        if "option5"=true then
                     DoCmd.OpenForm "form entree"
                      Forms![Form Entrée]![motif]="Pas interressé"
                      DoCmd.Close acForm, "entree"
         Else 
                      DoCmd.OpenForm "form entree"
                      Forms![Form Entrée]![motif]="Autre..."
                      DoCmd.Close acForm, "entree"
        End if
    End if
    Voilà ce que j'ai et cela ne fonctionne pourtant pas où ce situe le problème?
    Merci
    J'ai essayé avec "True"

  4. #4
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 684
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 684
    Par défaut
    il ne faut pas confondre le nom d'un control et sa valeur :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    if Me.option3 = true then
        DoCmd.OpenForm "form entree"
        Forms![Form Entrée]![motif]="Ne réponds pas"
        DoCmd.Close acForm, "entree"
    Else 
        if Me.option5=true then
                     DoCmd.OpenForm "form entree"
                      Forms![Form Entrée]![motif]="Pas interressé"
                      DoCmd.Close acForm, "entree"
         Else 
                      DoCmd.OpenForm "form entree"
                      Forms![Form Entrée]![motif]="Autre..."
                      DoCmd.Close acForm, "entree"
        End if
    End if
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel (3e édition)
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    205
    Détails du profil
    Informations personnelles :
    Localisation : France, Loir et Cher (Centre)

    Informations forums :
    Inscription : Juillet 2009
    Messages : 205
    Par défaut
    Il me met "expression sans paramètre", j'ai donc essayé en mettant Me.option.Value = True mais cela ne change rien.

  6. #6
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 684
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 684
    Par défaut
    ok,
    que t'affiche cette ligne
    dans la fenetre d'exécution lorsque ton formulaire est ouvert stp ?
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel (3e édition)
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  7. #7
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    205
    Détails du profil
    Informations personnelles :
    Localisation : France, Loir et Cher (Centre)

    Informations forums :
    Inscription : Juillet 2009
    Messages : 205
    Par défaut
    Propriété ou méthode non gérée par cet objet

    Cela doit venir du fait que c'est une case à option et pas une case à cocher.

  8. #8
    Membre chevronné
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    357
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 357
    Par défaut
    Ca viendrait pas des fois de ?

    Une fois il est écrit "form entree", l'autre "form Entrée".

    Tu peux aussi mettre un point d'arret au debut de ta fonction et passer en pas à pas pour voir ou se situe l'erreur.

  9. #9
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    205
    Détails du profil
    Informations personnelles :
    Localisation : France, Loir et Cher (Centre)

    Informations forums :
    Inscription : Juillet 2009
    Messages : 205
    Par défaut
    Citation Envoyé par Access Newbie Voir le message
    Ca viendrait pas des fois de ?

    Une fois il est écrit "form entree", l'autre "form Entrée".
    non il me met bien que c'est la ligne de définition de valeur si option = true qui ne va pas même si c'est mal orthographiè ici cela l'est bien sur mon ordi

  10. #10
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    205
    Détails du profil
    Informations personnelles :
    Localisation : France, Loir et Cher (Centre)

    Informations forums :
    Inscription : Juillet 2009
    Messages : 205
    Par défaut
    Bonjour,
    Alors j'ai trouvé ma réponse : j'avais mis mes boutons d'options dans un cadre et il fallait donc chercher la valeur du cadre (1,2 ou 3) pour savoir ce qui était bon.
    Merci à ceux qui m'ont aidé.

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

Discussions similaires

  1. [AC-2007] Comment vérifier la valeur d'une case à cocher d'une valeur
    Par glooping dans le forum IHM
    Réponses: 1
    Dernier message: 01/10/2009, 17h29
  2. Réponses: 2
    Dernier message: 13/05/2009, 14h37
  3. Changer la valeur d'une case à cocher
    Par Naksh-i dans le forum Servlets/JSP
    Réponses: 3
    Dernier message: 27/10/2006, 12h57
  4. Réponses: 1
    Dernier message: 23/09/2006, 14h12
  5. Comment récupérer l'état d'une case à cocher
    Par oursquetaire dans le forum Général JavaScript
    Réponses: 7
    Dernier message: 10/01/2006, 08h58

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