Sur une feuille Excel, je voudrais que la cellule T4 soit=20
=E9gale =E0 12 fois le montant inscrit dans le textbox2 de mon=20
userform, si le bouton d'option 2 et le bouton d'option 9=20
sont activ=E9s... Voici ma formule actuelle...
Private Sub CommandButton1_Click()
If OptionButton9.Value =3D True And OptionButton2.Value =3D=20
True Then Range("T4").Value (ou . Formula)
=3D "=3D(me.textbox2.value)*12"
=20
Ca ne fonctionne pas....
Dans la cellule T4 on ne voit que le r=E9sultat de la=20
formule, soit =3D(me.textbox2.value)*12
Heureusement, au bout d'une semaine j'ai eu un portable (toujours avec un clavier turc), avec Windows et Excel en italien, c'était déjà moinssss pire ;-))
iiiiiiiiiiiiiii !!!!
Elle est bien bonne celle-là.
J'ai un ami retraité qui vit avec une Turque en Turquie et je ne manquerai pas de lui faire parvenir les complications Excel de son pays d'adoption !
;-)))
Serge
"Michel Gaboly" a écrit dans le message de news:
Re,
"si on mettait un point sur un i, ça en ferait deux !!!"
Pas toujours :
j'ai passé 1 mois en Turquie cet été, où je disposais au départ d'1 poste équipé de Windows 95 et d'Excel, tous les 2 en version turque.
Je te garantis que cela fait un peu bizarre. Pour améliorer le tout, on trouve sur les claviers turcs 2 "i" distincts, l'un sans point, l'autre avec.
Pour faciliter les choses la touche correspondant au "i" sans point se trouve à l'emplacement habituel du "i" avec point !
Bien évidemment, le "i" sans point n'est pas reconnu par VBA pour tous les mots du langage (if, integer, with ...).
L'utilisation du "i" sans point dans le nom d'un fichier est accepté, mais Excel refuse ensuite de l'ouvrir ;-))) Un double clic sur le fichier dans l'explorateur ne marche pas non plus.
Il est nécessaire de renommer le fichier si on veut l'ouvrir.
Pour tout arranger, pour obtenir notre "i" habituel en majuscule, auquel on ne met pas de point en général, il faut utiliser Majuscule + ... le "i" sans point, bien sûr ! Tandis que Majuscule + "i" avec point donne un "i" majuscule avec point, non reconnu par VBA ;-)))
Tu as touché un point (sans i ;-))) sensible, comme tu peux le voir ;-))
;-)))
Et j'ose espérer que tu ne cesseras pas de nous mettre les points sur les i. Quoique ... si on mettait un point sur un i, ça en ferait deux !!!
Serge
"Michel Gaboly" a écrit dans le message de news:
Salut Serge,
Pointilleux ? Les grands mots, tout de suite ;-)))
C'est juste une question d'approche : quand j'ai découvert VBA à l'époque
d'Excel 5, alors que je pratiquais les anciennes macros depuis longtemps,
j'ai détesté ce langage, en particulier parce ce que je le trouvais effroya-
blement verbeux.
J'ai toujours la même impression désagréable vis-à-vis du code produit par l'enregistreur de macros.
C'est pour cela que j'essaye d'éviter le code inutile.
Je sais que certains vont prétendre que c'est contradictoire avec la fréquente
longueur de mes interventions ici, mais ceci est une autre histoire ;-)))
Toujours aussi pointilleux ! ;-) Mais je crois tout de même que c'est une bonne chose d'ajouter des détails «superfétatoires ou pléonasmiques» pour que le «lecteur» sache à quoi s'en tenir.
;-)))
Serge
"Michel Gaboly" a écrit dans le message de news:
Bonsoir Denys,
Variante :
If OptionButton2 And OptionButton9 Then Range("T4") = TextBox2 * 12 End If
Value est la propriété par défaut des objets TextBox et OptionButton. Il n'est donc pas utile de le préciser.
Quant à "=True", c'est l'équivalent d'un pléonasme :
Dans ce genre de test, une expression booléenne est évaluée et le résultat ne peut être que True or False.
Je sais bien qu'intuitivement beaucoup de gens ont tendance à écrire "=True" (ou =VRAI avec la fonction SI()) des feuilles de calcul, mais ce n'est pas nécessaire : cela équivaut à dire dans
le langage courant :
"S'il est vrai que j'ai la moyenne en maths, je serai reçu."
au lieu de
"Si j'ai la moyenne en maths, je serai reçu."
Bonjour à tous,
Sur une feuille Excel, je voudrais que la cellule T4 soit égale à 12 fois le montant inscrit dans le textbox2 de mon userform, si le bouton d'option 2 et le bouton d'option 9 sont activés... Voici ma formule actuelle...
Private Sub CommandButton1_Click()
If OptionButton9.Value = True And OptionButton2.Value > > > > > > > True Then Range("T4").Value (ou . Formula) = "=(me.textbox2.value)*12"
Ca ne fonctionne pas....
Dans la cellule T4 on ne voit que le résultat de la formule, soit =(me.textbox2.value)*12
Quelqu'un aurait une petite idée??
Merci
Denys
-- Cordialement,
Michel Gaboly http://www.gaboly.com
-- Cordialement,
Michel Gaboly http://www.gaboly.com
-- Cordialement,
Michel Gaboly http://www.gaboly.com
-- Cordialement,
Michel Gaboly http://www.gaboly.com
Re,
Heureusement, au bout d'une semaine j'ai eu un portable (toujours
avec un clavier turc), avec Windows et Excel en italien, c'était
déjà moinssss pire ;-))
iiiiiiiiiiiiiii !!!!
Elle est bien bonne celle-là.
J'ai un ami retraité qui vit avec une Turque en Turquie
et je ne manquerai pas de lui faire parvenir
les complications Excel de
son pays d'adoption !
;-)))
Serge
"Michel Gaboly" <michel@Suppgaboly.com> a écrit dans le message de news:
3FAAAFDD.9D3AB52A@Suppgaboly.com...
Re,
"si on mettait un point sur un i, ça en ferait deux !!!"
Pas toujours :
j'ai passé 1 mois en Turquie cet été, où je disposais au départ d'1
poste équipé de Windows 95 et d'Excel, tous les 2 en version turque.
Je te garantis que cela fait un peu bizarre. Pour améliorer le tout,
on trouve sur les claviers turcs 2 "i" distincts, l'un sans point,
l'autre avec.
Pour faciliter les choses la touche correspondant au "i" sans point
se trouve à l'emplacement habituel du "i" avec point !
Bien évidemment, le "i" sans point n'est pas reconnu par VBA pour
tous les mots du langage (if, integer, with ...).
L'utilisation du "i" sans point dans le nom d'un fichier est accepté,
mais Excel refuse ensuite de l'ouvrir ;-))) Un double clic sur le
fichier dans l'explorateur ne marche pas non plus.
Il est nécessaire de renommer le fichier si on veut l'ouvrir.
Pour tout arranger, pour obtenir notre "i" habituel en majuscule,
auquel on ne met pas de point en général, il faut utiliser Majuscule
+ ... le "i" sans point, bien sûr ! Tandis que Majuscule + "i" avec point
donne un "i" majuscule avec point, non reconnu par VBA ;-)))
Tu as touché un point (sans i ;-))) sensible, comme tu peux le voir ;-))
;-)))
Et j'ose espérer que tu ne cesseras pas de nous
mettre les points sur les i.
Quoique ... si on mettait un point sur un i, ça en ferait deux !!!
Serge
"Michel Gaboly" <michel@Suppgaboly.com> a écrit dans le message de news:
3FAA976F.5C9B45EA@Suppgaboly.com...
Salut Serge,
Pointilleux ? Les grands mots, tout de suite ;-)))
C'est juste une question d'approche : quand j'ai découvert VBA à
l'époque
d'Excel 5, alors que je pratiquais les anciennes macros depuis
longtemps,
j'ai détesté ce langage, en particulier parce ce que je le trouvais
effroya-
blement verbeux.
J'ai toujours la même impression désagréable vis-à-vis du code produit
par l'enregistreur de macros.
C'est pour cela que j'essaye d'éviter le code inutile.
Je sais que certains vont prétendre que c'est contradictoire avec la
fréquente
longueur de mes interventions ici, mais ceci est une autre histoire
;-)))
Toujours aussi pointilleux ! ;-)
Mais je crois tout de même que c'est une bonne chose
d'ajouter des détails «superfétatoires ou pléonasmiques»
pour que le «lecteur» sache à quoi s'en tenir.
;-)))
Serge
"Michel Gaboly" <michel@Suppgaboly.com> a écrit dans le message de
news:
3FAA8AE9.123CE94A@Suppgaboly.com...
Bonsoir Denys,
Variante :
If OptionButton2 And OptionButton9 Then
Range("T4") = TextBox2 * 12
End If
Value est la propriété par défaut des objets TextBox et
OptionButton. Il n'est donc pas utile de le préciser.
Quant à "=True", c'est l'équivalent d'un pléonasme :
Dans ce genre de test, une expression booléenne est évaluée
et le résultat ne peut être que True or False.
Je sais bien qu'intuitivement beaucoup de gens ont tendance
à écrire "=True" (ou =VRAI avec la fonction SI()) des feuilles
de calcul, mais ce n'est pas nécessaire : cela équivaut à dire
dans
le langage courant :
"S'il est vrai que j'ai la moyenne en maths, je serai reçu."
au lieu de
"Si j'ai la moyenne en maths, je serai reçu."
Bonjour à tous,
Sur une feuille Excel, je voudrais que la cellule T4 soit
égale à 12 fois le montant inscrit dans le textbox2 de mon
userform, si le bouton d'option 2 et le bouton d'option 9
sont activés... Voici ma formule actuelle...
Private Sub CommandButton1_Click()
If OptionButton9.Value = True And OptionButton2.Value > > > > > > > True Then Range("T4").Value (ou . Formula)
= "=(me.textbox2.value)*12"
Ca ne fonctionne pas....
Dans la cellule T4 on ne voit que le résultat de la
formule, soit =(me.textbox2.value)*12
Heureusement, au bout d'une semaine j'ai eu un portable (toujours avec un clavier turc), avec Windows et Excel en italien, c'était déjà moinssss pire ;-))
iiiiiiiiiiiiiii !!!!
Elle est bien bonne celle-là.
J'ai un ami retraité qui vit avec une Turque en Turquie et je ne manquerai pas de lui faire parvenir les complications Excel de son pays d'adoption !
;-)))
Serge
"Michel Gaboly" a écrit dans le message de news:
Re,
"si on mettait un point sur un i, ça en ferait deux !!!"
Pas toujours :
j'ai passé 1 mois en Turquie cet été, où je disposais au départ d'1 poste équipé de Windows 95 et d'Excel, tous les 2 en version turque.
Je te garantis que cela fait un peu bizarre. Pour améliorer le tout, on trouve sur les claviers turcs 2 "i" distincts, l'un sans point, l'autre avec.
Pour faciliter les choses la touche correspondant au "i" sans point se trouve à l'emplacement habituel du "i" avec point !
Bien évidemment, le "i" sans point n'est pas reconnu par VBA pour tous les mots du langage (if, integer, with ...).
L'utilisation du "i" sans point dans le nom d'un fichier est accepté, mais Excel refuse ensuite de l'ouvrir ;-))) Un double clic sur le fichier dans l'explorateur ne marche pas non plus.
Il est nécessaire de renommer le fichier si on veut l'ouvrir.
Pour tout arranger, pour obtenir notre "i" habituel en majuscule, auquel on ne met pas de point en général, il faut utiliser Majuscule + ... le "i" sans point, bien sûr ! Tandis que Majuscule + "i" avec point donne un "i" majuscule avec point, non reconnu par VBA ;-)))
Tu as touché un point (sans i ;-))) sensible, comme tu peux le voir ;-))
;-)))
Et j'ose espérer que tu ne cesseras pas de nous mettre les points sur les i. Quoique ... si on mettait un point sur un i, ça en ferait deux !!!
Serge
"Michel Gaboly" a écrit dans le message de news:
Salut Serge,
Pointilleux ? Les grands mots, tout de suite ;-)))
C'est juste une question d'approche : quand j'ai découvert VBA à l'époque
d'Excel 5, alors que je pratiquais les anciennes macros depuis longtemps,
j'ai détesté ce langage, en particulier parce ce que je le trouvais effroya-
blement verbeux.
J'ai toujours la même impression désagréable vis-à-vis du code produit par l'enregistreur de macros.
C'est pour cela que j'essaye d'éviter le code inutile.
Je sais que certains vont prétendre que c'est contradictoire avec la fréquente
longueur de mes interventions ici, mais ceci est une autre histoire ;-)))
Toujours aussi pointilleux ! ;-) Mais je crois tout de même que c'est une bonne chose d'ajouter des détails «superfétatoires ou pléonasmiques» pour que le «lecteur» sache à quoi s'en tenir.
;-)))
Serge
"Michel Gaboly" a écrit dans le message de news:
Bonsoir Denys,
Variante :
If OptionButton2 And OptionButton9 Then Range("T4") = TextBox2 * 12 End If
Value est la propriété par défaut des objets TextBox et OptionButton. Il n'est donc pas utile de le préciser.
Quant à "=True", c'est l'équivalent d'un pléonasme :
Dans ce genre de test, une expression booléenne est évaluée et le résultat ne peut être que True or False.
Je sais bien qu'intuitivement beaucoup de gens ont tendance à écrire "=True" (ou =VRAI avec la fonction SI()) des feuilles de calcul, mais ce n'est pas nécessaire : cela équivaut à dire dans
le langage courant :
"S'il est vrai que j'ai la moyenne en maths, je serai reçu."
au lieu de
"Si j'ai la moyenne en maths, je serai reçu."
Bonjour à tous,
Sur une feuille Excel, je voudrais que la cellule T4 soit égale à 12 fois le montant inscrit dans le textbox2 de mon userform, si le bouton d'option 2 et le bouton d'option 9 sont activés... Voici ma formule actuelle...
Private Sub CommandButton1_Click()
If OptionButton9.Value = True And OptionButton2.Value > > > > > > > True Then Range("T4").Value (ou . Formula) = "=(me.textbox2.value)*12"
Ca ne fonctionne pas....
Dans la cellule T4 on ne voit que le résultat de la formule, soit =(me.textbox2.value)*12
