Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 20/06/2011, 10h07   #1
Invité régulier
 
Femme Virginie Duboc
Étudiant
Inscription : juin 2011
Messages : 29
Détails du profil
Informations personnelles :
Nom : Femme Virginie Duboc
Âge : 20
Localisation : France, Oise (Picardie)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : juin 2011
Messages : 29
Points : 7
Points : 7
Par défaut Tester la valeur d'un bouton radio

Bonjour bonjour.

J'ai beau chercher partout, je ne trouve nul part...
Je voudrais dire ceci en VBA en gros :

Si <nom du bouton radio> est null Alors
blablabla
Sinon
blablabla
Fin Si

Tout ce que je trouve c'est que ça doit être le cadre qui doit être à la place du <nom bouton radio>, mais en cliquant sur l'autre bouton radio, l'instruction ne doit pas s'effectuer...

Edit : Voici une impression écran pour que vous voyiez à quoi ça ressemble.



En fait, au départ, seul le mois est affiché, quand on en sélectionne un, les boutons radio s'affichent. C'est là que ça se complique. Je voudrais que quand on sélectionne "un apprenti", tout le reste s'affiche, alors que quand on clique sur "tous", seuls les cases à cocher s'affichent (puisque tous les apprentis seront sélectionnés par défaut, donc pas besoin de les sélectionner), sauf que dans les deux cas, tout s'affiche...
voyel est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/06/2011, 14h49   #2
Membre Expert
 
Avatar de stigma
 
Homme Alain
Développeur informatique
Inscription : octobre 2003
Messages : 846
Détails du profil
Informations personnelles :
Nom : Homme Alain
Âge : 61
Localisation : France, Oise (Picardie)

Informations professionnelles :
Activité : Développeur informatique
Secteur : Industrie

Informations forums :
Inscription : octobre 2003
Messages : 846
Points : 1 053
Points : 1 053
Envoyer un message via MSN à stigma
Code :
If IsNull(monBouton) = True Then .......
__________________
Je ne suis pas une adresse IP, je suis un homme libre !
stigma est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/06/2011, 15h11   #3
Invité régulier
 
Femme Virginie Duboc
Étudiant
Inscription : juin 2011
Messages : 29
Détails du profil
Informations personnelles :
Nom : Femme Virginie Duboc
Âge : 20
Localisation : France, Oise (Picardie)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : juin 2011
Messages : 29
Points : 7
Points : 7
Merci de ta réponse !

C'est ce que j'avais fait...
Mon bouton radio à côté de "Un apprenti" s'appelle "unapp" et l'autre s'appelle "tousapp", mon cadre s'appelle "cadre" (recherché hein !).
Donc voilà mon code :

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub cadre_Click()
 
If IsNull(tousapp) = True Then
    Étiquette36.Visible = True
    Étiquette33.Visible = True
    Étiquette35.Visible = True
    muc1.Visible = True
    muc2.Visible = True
    Étiquette43.Visible = False
    listeapp.Visible = False
End If
If IsNull(unapp) = False Then
    Étiquette36.Visible = True
    Étiquette33.Visible = True
    Étiquette35.Visible = True
    muc1.Visible = True
    muc2.Visible = True
    Étiquette43.Visible = True
    listeapp.Visible = True
End If
 
End Sub
Et donc ça affiche quand même la zone de liste en cliquant sur "Tous", ce que je ne souhaite pas...
voyel est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/06/2011, 15h22   #4
Membre Expert
 
Avatar de stigma
 
Homme Alain
Développeur informatique
Inscription : octobre 2003
Messages : 846
Détails du profil
Informations personnelles :
Nom : Homme Alain
Âge : 61
Localisation : France, Oise (Picardie)

Informations professionnelles :
Activité : Développeur informatique
Secteur : Industrie

Informations forums :
Inscription : octobre 2003
Messages : 846
Points : 1 053
Points : 1 053
Envoyer un message via MSN à stigma
Tu devrais nommer correctrement tes contrôles au lieu de Etiquette33. On ne sait pas à quoi ça correspond sur le formulaire.
Tes 2 boutons radio sont-il bien dans un même groupe d'option ?
Ainsi tu ne testerais que la valeur de l'option (rien, ou 1 ou 2) sans avoir à utiliser la propriété évènementielle des boutons radio.
Code :
1
2
3
If Radio_apprenti = 1 Then...
...........
If Radio_apprenti = 2 Then...
__________________
Je ne suis pas une adresse IP, je suis un homme libre !
stigma est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/06/2011, 15h27   #5
Invité régulier
 
Femme Virginie Duboc
Étudiant
Inscription : juin 2011
Messages : 29
Détails du profil
Informations personnelles :
Nom : Femme Virginie Duboc
Âge : 20
Localisation : France, Oise (Picardie)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : juin 2011
Messages : 29
Points : 7
Points : 7
Oui, d'habitude je le fais, mais là je me suis dit que ce ne sont que des étiquettes, donc j'ai laissé tel quel ^^
Merci pour cette seconde réponse. Ils sont effectivement bien dans le même groupe d'option.
C'est génial, ça fonctionne ! Merci beaucoup !
voyel est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 22h22.


 
 
 
 
Partenaires

Hébergement Web