Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Mettre dans une cellule la valeur d'une checkbox

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion fantomex
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
F

fantomex

Guest
Bonjour à tous, je suis tout nouveau dans le monde d'excel, alors je vais essayé d'expliquer le plus simplement mon problème :
Je fais un inventaire des produits chimiques pour mon entreprise.
j'ai crée un formulaire dans Visual Basic avec (entre autre) un cadre "secteur d'utilisation", où il y a 5 checkbox pour les 5 différents secteurs (administratif, atelier 1, atelier 2, atelier 3, laboratoire).
Voici deux situations :
- situation 1 : Mon produit A se trouve uniquement dans le secteur "administratif", je coche la checkbox "administratif". Ce que je veux, c'est que cela me marque "administratif" dans ma cellule excel, lorsque je coche la checkbox administratif de mon formulaire.

- situation 2 : Mon Produit B se trouve à la fois dans le secteur "administratif", mais également dans le secteur "laboratoire". Ce que je veux, c'est que cela me marque "administratif", et "laboratoire" en dessous (les deux dans la même cellule), lorsque je coche les checkbox "administratif" et "laboratoire" dans le formulaire.

Je ne sais pas si cela est possible... mais ça m’enlèverait une épine du pied.
En vous remerciant par avance (j'utilise excel 2003)
 
Trier par date Trier par votes
Re : Mettre dans une cellule la valeur d'une checkbox

Bonjour et bienvenu

Plutot qu'un long discours, il faudrait que tu joignes ton fichier exemples (exempt de toute donnée confidentielle) comme ca, on pourrait t'apporte les éléments de réponse directement adaptés à ton besoin..

et pour répondre à la question. oui bien sur, c'est possible
 
Vote positif 0 Vote négatif
Re : Mettre dans une cellule la valeur d'une checkbox

Bonjour,

regarde peut être ceci, à adapter à ton projet, sans plus de détails, difficle d'en dire plus :
Code: 
Option Explicit
Private Sub CheckBox1_Click()
Range("A1") = IIf(CheckBox1, CheckBox1.Caption, "")
End Sub
bon après midi
@+

Edition : bonjour vgendron
 
Vote positif 0 Vote négatif
Re : Mettre dans une cellule la valeur d'une checkbox

Effectivement ce serait plus simple, malheuresment, lorsque j'enleve les données, le formulaire ne marche plus... (je ne comprend pas pourquoi d'ailleurs). Je joint quand même un imprim--ecran de mon formulaire, ainsi que le code que j'ai commencé à écrire (pas simple qu'on on y connait rien)


le code :

Private Sub CommandButtonAjouter_Click()
Sheets("Feuil1").Range("A6").Value = TxtNomCommercial.Value
Sheets("Feuil1").Range("B6").Value = TxtAutreNom.Value
Sheets("Feuil1").Range("C6").Value = TxtDescription.Value
Sheets("Feuil1").Range("D6").Value = TxtCodeArticle.Value
Sheets("Feuil1").Range("E6").Value = TxtFournisseur.Value
Sheets("Feuil1").Range("F6").Value = TxtFabricant.Value
Sheets("Feuil1").Range("G6").Value = TxtCoordonnees.Value
Sheets("Feuil1").Range("H6").Value = TxtSubstance.Value
Sheets("Feuil1").Range("I6").Value = TxtCAS.Value
Sheets("Feuil1").Range("J6").Value = TxtCE.Value
Sheets("Feuil1").Range("K6").Value = TxtEnregistrement.Value




UsfNew.Hide

End Sub

J'ai réussi à résoudre la situation 1 grâce au code suivant :
Private Sub CheckBoxAdmin_Click()
If CheckBoxAdmin.Value = True Then
[m6] = "Administratif"
Else
[m6] = ""
End If


par contre, comment faire pour mettre deux noms, issus de 2 checkbox, dans la même cellule, l'un dessous l'autre ?????
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

P
  • Résolu(e)
XL 2021 Comment détecter la modification MANUELLE d'une cellule dans une feuille ?
Réponses
3
Affichages
339
PRy
P
M
  • Résolu(e)
XL 2021 Récupérer la valeur d’une cellule dans un classeur fermé
Réponses
5
Affichages
353
patricktoulon
L
  • Résolu(e)
Microsoft 365 Retourner l'en-tête colonne correspondante à une quantité donnée dans une ligne
Réponses
4
Affichages
410
LegVal
L
  • Résolu(e)
Autres Copier/ Coller plage de données dans une autre cellule d'un même onglet
Réponses
6
Affichages
470
fenec
J
  • Résolu(e)
XL 2021 Coloriser une cellule avec un click d'une colonne
Réponses
10
Affichages
505
TooFatBoy
O
  • Question Question
XL 2016 Enlever une chaîne de caractères d'une cellule dans une formule SOMME.SI
Réponses
3
Affichages
348
JHA
J
O
  • Question Question
XL 2016 Enlever une chaîne de caractères d'une cellule dans une formule SOMME.SI
Réponses
1
Affichages
343
JHA
J
C
  • Question Question
XL 2016 VBA - Mettre en Indice une partie du contenu d'une cellule : problème avec la propriété Font.Subscript
Réponses
2
Affichages
576
crocrocro
C
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
686
Phil69970
E
  • Résolu(e)
Microsoft 365 Boucle Checkbox ActiveX + Report dans TextBox
Réponses
5
Affichages
805
ExcLnoob
E
  • Résolu(e)
Microsoft 365 Remplir une cellule avec la valeur d'une autre sous condition
Réponses
2
Affichages
598
Droopyougo
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
1 K
fanfan38
I
  • Résolu(e)
Microsoft 365 Exécuter une macro en fonction de la valeur d'une cellule
Réponses
12
Affichages
909
iliess
I
P
  • Résolu(e)
XL pour MAC Problème de changement de couleur de la valeur d'une cellule
Réponses
2
Affichages
578
pvander
P
T
  • Question Question
Microsoft 365 Cocher automatiquement des checkbox avec des conditions
2
Réponses
24
Affichages
2 K
TCHIS
T
T
  • Résolu(e)
Microsoft 365 Chercher si dans une plage de cellule la valeur d'une autre cellule est présente
Réponses
4
Affichages
561
TomJoad
T
T
  • Question Question
XL 2016 SI INDEX EQUIV Doublons...
Réponses
8
Affichages
685
Titiem
T
N
  • Résolu(e)
Microsoft 365 Format date d'une textbox vers une cellule
Réponses
8
Affichages
831
ChTi160
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
1 K
Nel'
N
C
  • Question Question
Microsoft 365 je cherche un code excel pour copier la couleur d'une cellule, à toutes les cellules qui ont la même valeur dans mon tableau.
Réponses
1
Affichages
501
sylvanu
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…