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

Macros et VBA Excel Discussion :

Réinitialisation des OptionButton


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé
    Homme Profil pro
    Ingenieur Securite
    Inscrit en
    Mai 2012
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Tarn (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingenieur Securite
    Secteur : Industrie

    Informations forums :
    Inscription : Mai 2012
    Messages : 97
    Par défaut Réinitialisation des OptionButton
    Bonjour,

    Merci de votre attention à mon problème.

    J'ai des questionnaires sous forme d'USF
    Pour chaque questions deux ou 3 possibilité de réponse, OUI, N/A, NON
    Le fait de choisir NON, ça ouvre l’USF « Plan_action »
    L’utilisateur doit remplir l’USF « Plan_action » et valide pour passer à la question suivante. Mais je souhaiterai que lorsqu'il clique sur "Annuler" de l'USF "Plan_action" ça réinitialise les OptionButton dans le frame ayant ouvert le plan d'action.
    Ex : Dans le Questionnaire1_Sécu, à la question QS5 je répond "NON", "Plan_action" s'ouvre, mais je clique sur "Annuler", je voudrais que le Frame QS5 revienne à son état initial, c'est à dire aucun bouton coché.

    Comment je pourrai le faire?

    Cordialement
    Fichiers attachés Fichiers attachés

  2. #2
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    bonjour,

    Comme la Usf "Plan_action" s'ouvre uniquement on clic sur non, il n'y a que ce bouton d'option à remettre a vide

  3. #3
    Membre confirmé
    Homme Profil pro
    Ingenieur Securite
    Inscrit en
    Mai 2012
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Tarn (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingenieur Securite
    Secteur : Industrie

    Informations forums :
    Inscription : Mai 2012
    Messages : 97
    Par défaut
    Bonjour Jérôme, question idiote : Je le place où ce code?

  4. #4
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Dans l'évènement click du bouton annuler

    Quelque chose comme cela
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Usf_Formulaire.OptBurron.Value=False

  5. #5
    Membre confirmé
    Homme Profil pro
    Ingenieur Securite
    Inscrit en
    Mai 2012
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Tarn (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingenieur Securite
    Secteur : Industrie

    Informations forums :
    Inscription : Mai 2012
    Messages : 97
    Par défaut
    Salut Jfontaine,

    Sur un autre Forum, j'ai trouvé cette solution :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub CommandButtonPA_Annuler_Click()
        Unload Plan_action
        Dim c As Control
        For Each c In Questionnaire1_Sécu.Controls
            If TypeName(c) = "OptionButton" Then c.Value = False
        Next c
        Erase qs()
    End Sub
    Je le duplique pour chaque questionnaire.

    Le seul bémole est que l'ensemble des optionbutton du formulaire sont désactivés alors que je souhaite que ça désactive uniquement celui qui à ouvert mon USF "Plan_action"

    Si tu as une idée à me donner.

Discussions similaires

  1. Réinitialiser des données
    Par lolo_bob2 dans le forum Access
    Réponses: 4
    Dernier message: 22/06/2006, 19h34
  2. [oracle 9i] Réinitialisation des séquences
    Par Requin15 dans le forum Oracle
    Réponses: 4
    Dernier message: 08/06/2006, 12h07
  3. [VB6] Pb avec des OptionButton ..
    Par Lucas42 dans le forum VB 6 et antérieur
    Réponses: 21
    Dernier message: 27/04/2006, 11h38
  4. [FLASH MX2004] Réinitialiser des variables ...
    Par vbcasimir dans le forum Flash
    Réponses: 2
    Dernier message: 21/02/2006, 17h32
  5. Réponses: 9
    Dernier message: 10/01/2006, 16h27

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