Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
papou
Bonjour Une case à cocher renvoie une valeur booléenne. Docn si tu veux saisir un X dans la cellule si la case est cochée, il faut : If Me.CB_1.Value = True Then ActiveCell.Offset (0, 15).Value = "X" End If
Cordialement Pascal
"RT" a écrit dans le message de news:
Bonjour à toutes et tous
Me revoilà avec mes incapacités à comprendre des choses simple
Je commence (enfin) à comprendre un petit peu comment créer et utiliser un userform pour faciliter l'entrée de données
Dans mon userform j'ai toute une serie de champs à remplir
Et en copiant des bouts de codes à gauche et à droite, je suis parvenu à faire en sorte que cet info ce retrouve dans les cellules adéquates
Maintenant je voudrais inclure des "Check Box"
J'ai nommé mes check box CB_1, CB_2, CB_3, etc
Ce que je voudrais est que si l'utilisateur Check le box, un X se mette dans la cellule
Il n'est pas obligatoire de Checker ces box Il s'agit d'une option qu'ils peuvent choisir ou non
J'ai inclus une ligne
ActiveCell.Offset (0, 15).Value = Me.CB_1
Sans résultat
Si nécessaire je pourrais poster le code
Mais si quelqu'un à déjà une idée
D'avance un grand merci
a bientôt
Rex
Bonjour
Une case à cocher renvoie une valeur booléenne.
Docn si tu veux saisir un X dans la cellule si la case est cochée, il faut :
If Me.CB_1.Value = True Then
ActiveCell.Offset (0, 15).Value = "X"
End If
Cordialement
Pascal
"RT" <rthsopmapmson@softscreen.be> a écrit dans le message de news:
OH8r2HNTGHA.4264@TK2MSFTNGP11.phx.gbl...
Bonjour à toutes et tous
Me revoilà avec mes incapacités à comprendre des choses simple
Je commence (enfin) à comprendre un petit peu comment créer et utiliser un
userform pour faciliter l'entrée de données
Dans mon userform j'ai toute une serie de champs à remplir
Et en copiant des bouts de codes à gauche et à droite, je suis parvenu à
faire en sorte que cet info ce retrouve dans les cellules adéquates
Maintenant je voudrais inclure des "Check Box"
J'ai nommé mes check box CB_1, CB_2, CB_3, etc
Ce que je voudrais est que si l'utilisateur Check le box, un X se mette
dans
la cellule
Il n'est pas obligatoire de Checker ces box
Il s'agit d'une option qu'ils peuvent choisir ou non
Bonjour Une case à cocher renvoie une valeur booléenne. Docn si tu veux saisir un X dans la cellule si la case est cochée, il faut : If Me.CB_1.Value = True Then ActiveCell.Offset (0, 15).Value = "X" End If
Cordialement Pascal
"RT" a écrit dans le message de news:
Bonjour à toutes et tous
Me revoilà avec mes incapacités à comprendre des choses simple
Je commence (enfin) à comprendre un petit peu comment créer et utiliser un userform pour faciliter l'entrée de données
Dans mon userform j'ai toute une serie de champs à remplir
Et en copiant des bouts de codes à gauche et à droite, je suis parvenu à faire en sorte que cet info ce retrouve dans les cellules adéquates
Maintenant je voudrais inclure des "Check Box"
J'ai nommé mes check box CB_1, CB_2, CB_3, etc
Ce que je voudrais est que si l'utilisateur Check le box, un X se mette dans la cellule
Il n'est pas obligatoire de Checker ces box Il s'agit d'une option qu'ils peuvent choisir ou non
J'ai inclus une ligne
ActiveCell.Offset (0, 15).Value = Me.CB_1
Sans résultat
Si nécessaire je pourrais poster le code
Mais si quelqu'un à déjà une idée
D'avance un grand merci
a bientôt
Rex
RT
Et ben,
Rapide Efficace Précis
Je ne sais pas quoi ajouter
Un grand merci, peut-être?
Allez, si t'insiste, et dis toi que c'est bien parceque c'est toi
C'est d'accord
Je t'envoi un grand merci
MERCI
Et comme je ne voudrais pas terminer aussi court, j'ai une petite question
Quelle est la commande dans le code qui fait que
Une fois mes cellules remplies, mes box checkés et que je clique sur un bouton "Valider"
Et l'info se retrouve sur la ligne en dessous de la dernière ligne vide
Et je ne trouve pas une ligne de code qui dit ligne suivante
C'est un code que j'ai récupéré et que je bidouille (je trouve que c'est encore le meilleure façon d'aprendre)
Si tu as une idée, je suis tout ouie
A bientôt et encore MERCI
Rex qui maintenant :-))))))))))
"papou" <cestpasbon@çanonplus> wrote in message news:
Bonjour Une case à cocher renvoie une valeur booléenne. Docn si tu veux saisir un X dans la cellule si la case est cochée, il faut :
If Me.CB_1.Value = True Then ActiveCell.Offset (0, 15).Value = "X" End If
Cordialement Pascal
"RT" a écrit dans le message de news:
Bonjour à toutes et tous
Me revoilà avec mes incapacités à comprendre des choses simple
Je commence (enfin) à comprendre un petit peu comment créer et utiliser un
userform pour faciliter l'entrée de données
Dans mon userform j'ai toute une serie de champs à remplir
Et en copiant des bouts de codes à gauche et à droite, je suis parvenu à faire en sorte que cet info ce retrouve dans les cellules adéquates
Maintenant je voudrais inclure des "Check Box"
J'ai nommé mes check box CB_1, CB_2, CB_3, etc
Ce que je voudrais est que si l'utilisateur Check le box, un X se mette dans la cellule
Il n'est pas obligatoire de Checker ces box Il s'agit d'une option qu'ils peuvent choisir ou non
J'ai inclus une ligne
ActiveCell.Offset (0, 15).Value = Me.CB_1
Sans résultat
Si nécessaire je pourrais poster le code
Mais si quelqu'un à déjà une idée
D'avance un grand merci
a bientôt
Rex
Et ben,
Rapide
Efficace
Précis
Je ne sais pas quoi ajouter
Un grand merci, peut-être?
Allez, si t'insiste, et dis toi que c'est bien parceque c'est toi
C'est d'accord
Je t'envoi un grand merci
MERCI
Et comme je ne voudrais pas terminer aussi court, j'ai une petite question
Quelle est la commande dans le code qui fait que
Une fois mes cellules remplies, mes box checkés et que je clique sur un
bouton "Valider"
Et l'info se retrouve sur la ligne en dessous de la dernière ligne vide
Et je ne trouve pas une ligne de code qui dit ligne suivante
C'est un code que j'ai récupéré et que je bidouille (je trouve que c'est
encore le meilleure façon d'aprendre)
Si tu as une idée, je suis tout ouie
A bientôt
et encore MERCI
Rex qui maintenant :-))))))))))
"papou" <cestpasbon@çanonplus> wrote in message
news:OE2u0ONTGHA.4264@TK2MSFTNGP11.phx.gbl...
Bonjour
Une case à cocher renvoie une valeur booléenne.
Docn si tu veux saisir un X dans la cellule si la case est cochée, il faut
:
If Me.CB_1.Value = True Then
ActiveCell.Offset (0, 15).Value = "X"
End If
Cordialement
Pascal
"RT" <rthsopmapmson@softscreen.be> a écrit dans le message de news:
OH8r2HNTGHA.4264@TK2MSFTNGP11.phx.gbl...
Bonjour à toutes et tous
Me revoilà avec mes incapacités à comprendre des choses simple
Je commence (enfin) à comprendre un petit peu comment créer et utiliser
un
userform pour faciliter l'entrée de données
Dans mon userform j'ai toute une serie de champs à remplir
Et en copiant des bouts de codes à gauche et à droite, je suis parvenu à
faire en sorte que cet info ce retrouve dans les cellules adéquates
Maintenant je voudrais inclure des "Check Box"
J'ai nommé mes check box CB_1, CB_2, CB_3, etc
Ce que je voudrais est que si l'utilisateur Check le box, un X se mette
dans
la cellule
Il n'est pas obligatoire de Checker ces box
Il s'agit d'une option qu'ils peuvent choisir ou non
