Modifier code Classe

JNP

XLDnaute Barbatruc

• 27 Juillet 2011

• #2

Re : Modifier code Classe

Salut Max 🙂,
Comme d'habitude, tes explications sont vachement claires 😡...
Si j'ai un peu compris 🙄

Code:

Private Sub UserForm_Initialize()
Dim Ctl As MSForms.Control
i = 1
For Each Ctl In Me.Controls
    If TypeOf Ctl Is MSForms.TextBox And Left(Ctl.Name, 2) = "TT" Then
        ReDim Preserve txt(i)
        Set txt(i).txt = Ctl
        i = i + 1
    End If
Next
End Sub

limitera le module de classe aux TextBox qui commencent par TT 😛...
Bon courage 😎
Ajout : Salut Pierrot 🙂

 

Dernière édition: 27 Juillet 2011

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 27 Juillet 2011

• #3

Re : Modifier code Classe

bonjour,

peut être faire une boucle "for each" sur tous les controles de ton usf, en testant si le "typename" est bien "textbox".... de nombreux exemples sur le forum. enfin si j'ai bien compris ta demande, pas sûr...

bon après midi
@+

Edition : bonjour JNP🙂

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 27 Juillet 2011

• #4

Re : Modifier code Classe

Re,
Et je tiens à m'excuser si mes explications première était pas claires j'espère que cette foi si serons plus claires

Avec le code que j'ai récupéré, quand je rentres les valeurs dans les textbox1 je peut utiliser la flèche vers le bas pour aller sur le textbox2 ect…
Le problème si il y a problème. J'ai des textbox qui se nomme "T" ou TxtNom, TxtPrenom ect... et le code et prévu que si les textbox se nomme TextBox1, Textbox2 ect… Se que je recherche une modif pour que le code accepte tous les noms de textbox.

Je vous remercie par avance et vous souhaite une bonne journée.

Max

 

Vote positif 0 Vote négatif

DL_13

XLDnaute Occasionnel

• 27 Juillet 2011

• #5

Re : Modifier code Classe

Bonjour le Fil,

Ton fichier modifié si j'ai bien compris:

à déclarer autant de variables que nom de textboxes et recopier les Private Sub Noms_de_tes_Textbox_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) par autant de nom de tes textboxes (...pas facile à expliquer)

Bonne Journée

 

Pièces jointes

• CLASSE MODIFIE.xlsm

  49.4 KB · Affichages: 56

Dernière édition: 27 Juillet 2011

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 27 Juillet 2011

• #6

Re : Modifier code Classe

Re 🙂,

apdf1 à dit:

j'espère que cette foi si serons plus claires

Cliquez pour agrandir...

Pas vraiment 🙄...

Code:

Se que je recherche une modif pour que le code accepte tous les noms de textbox.

Par rapport à ma modif, change

Code:

If TypeOf Ctl Is MSForms.TextBox And Left(Ctl.Name, 2) = "TT" Then

par

Code:

If TypeOf Ctl Is MSForms.TextBox Then

Mais c'est illogique d'appliquer une classe à tous les TextBox, il y a toujours une exception (en français, c'est toujours l'exception qui confirme la règle 😛, mais bon, je ne suis pas sûr que tu sois très copain avec le français 🙄).
Bon courage 😎

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 27 Juillet 2011

• #7

Re : Modifier code Classe

Bonjour DL_13

Je te remercie infiniment c'est exactement se que je recherchais. Juste une petite chose et-il possible de mettre un label en contrôle de saisie. pour que l'utilisateur si rentre des lettres à la place des chiffres il reçoit une message d'erreur sur un label non pas une mgbox.

Bonne journée

Max

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 27 Juillet 2011

• #8

Re : Modifier code Classe

bonjour apdf1🙂🙂,DL_13🙂🙂,JNP🙂🙂,re Pierrot🙂🙂
comme je comprends cela veut dire que tous les autres renommees TxtNom, TxtPrenom
ne sont pas concerne par ces conditions ce qui serait assez logique nom prenom ect..

 

Pièces jointes

• Copie de CLASSE MODIFIER.xlsm.zip

  15.6 KB · Affichages: 25

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 27 Juillet 2011

• #9

Re : Modifier code Classe

Bonjour Laetitia,

Très heureux de ton code je te remercie infiniment toujours la grande classe. Juste une question que je ne comprend pas! Tous marche nickel mais quand je veut mettre certaines textbox en format €uros si la valeur est 10.00€ pas de problème si la valeur est ex:10.23 sa me donne 0.56 ?

@+
Max

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 27 Juillet 2011

• #10

Re : Modifier code Classe

JUSTE POUR JNP
Premierement je ne suis pas francais je suis en france depuis 4 ans et je ne pense pas que tu parle et ecris autant de langue que moi.

Avant de juger renseigne toi

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 27 Juillet 2011

• #11

Re : Modifier code Classe

Re 🙂,

apdf1 à dit:

JUSTE POUR JNP
Premierement je ne suis pas francais je suis en france depuis 4 ans et je ne pense pas que tu parle et ecris autant de langue que moi.

Avant de juger renseigne toi

Cliquez pour agrandir...

Ne monte pas sur tes grands chevals (pardon, chevaux 😛)...
Pour mémoire, je t'ai répondu souvent malgré tes questions obscures et tes explications nébuleuses 🙄...
Deuxièmement, tu n'as pas besoin d'être français pour être francophone 🙂...
Troisièmement, ça fait longtemps que j'ai passé l'âge de jouer à celui qui a la plus grande, quelque soit le nombre de langues que tu puisses posséder, celle de Molière ne me parait pas aquise pour autant 🙄...
Quatrièmement, la syntaxe du français, pour moi, est aussi importante que la syntaxe VBA, sans une bonne syntaxe, le code ne passe pas 😕...
Cinquièmement, la réponse de Laetitia (bises au passage 🙂), est la même que la mienne, pourquoi vouloir traiter toutes les TextBox alors que seules certaines en ont besoin 🙄...
Enfin, je ne peux que m'étonner que les réponses qui correspondent à ta question ne sont pas bonnes, alors que d'autres qui séparent les TextBox sans tenir compte de tes TxtNom et TxtPrénom, contrairement à ta demande (DL_13, je n'ai rien contre toi, tu le sais bien 😉), semblent correspondre à ta demande 🙁...
Enfin, pour ta gouverne, sache que "juger" signifie "trancher", alors que j'exprimais de simples doutes "je ne suis pas sûr" 🙄...
Bonne soirée quand même 😎

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 28 Juillet 2011

• #12

Re : Modifier code Classe

rebonjour tous 🙂🙂🙂🙂
comme cela pas simple comment tu as ecris ton format ??? tu fais des calculs ???
zip un exemple concret

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 28 Juillet 2011

• #13

Re : Modifier code Classe

Bonjour Laetitia,

Je te remercie d'avoir répondu.
Voila le fichier joint avec le code que j'emploi pour calculé .

Bonne journée

Max

 

Pièces jointes

• CLASSE MODIFIER2.xlsm

  23.9 KB · Affichages: 45

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 28 Juillet 2011

• #14

Re : Modifier code Classe

re, je vais regarde

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 28 Juillet 2011

• #15

Re : Modifier code Classe

Re,

OK je remercie

@+

 

Vote positif 0 Vote négatif