Excel vba Boutons options

Résolu
patordi Messages postés 38 Date d'inscription   Statut Membre Dernière intervention   -  
patordi Messages postés 38 Date d'inscription   Statut Membre Dernière intervention   -
Bonjours à tous et meilleurs vœux pour la nouvelle année.

Dans un formulaire de saisies j’ai 2 boutons options 1 pour monsieur et 1 pour madame.
Dans la base de données j’ai une colonne civilité je voudrais remplacer vrai ou faux par MR ou Mme.
Ce doit être tout bête, mais je ne trouve pas.

En vous remerciant d’avance pour vos lumières.
A voir également:

4 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Dans un formulaire de saisies
Feuille ou Userform????
0
Patordi
 
Bonjour,

Désolé j’ai oublier de le mentionner, c’est un Userform.

Encore merci pour votre aide.
0
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   463
 
Bonjour,
Un exemple de votre fichier avec explications serait le bienvenu.
Pour transmettre un fichier,
Veillez à ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Cordialement



0
patordi Messages postés 38 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonjour à tous et meilleurs vœux,

J’ai trouvé la solution, une fois que vous avez créer un frame avec boutons d’options dans votre userform vous insérez dans le bouton de Validation le code suivant :

Private Sub btnValidation_Click()
Dim ctrl As Control

For Each ctrl In Frame1.Controls
If ctrl.Value = True Then

Range("A1") = ctrl.Caption

End If

Next

End Sub

A une prochaine fois peut-être.
0