Mots répèter dans un textbox

Pierrot93

XLDnaute Barbatruc

• 6 Janvier 2015

• #2

Re : Mots répèter dans un textbox

Bonjour,

pourquoi utiliser l'événement "activate" de "l'userform", perso j'eusse plutôt joué avec les événements "enter" et "exit" des "textbox"...
A voir selon ton projet...
bon après midi
@+

 

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 6 Janvier 2015

• #3

Re : Mots répèter dans un textbox

Bonjour Pierrot,

Je te remercie de ton intervention quel code tu mettrais?
Les infos dans les textbox viennent de ma feuille "Base de données".
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 6 Janvier 2015

• #4

Re : Mots répèter dans un textbox

Re,

peut être ceci :

Code:

Private Sub TextBox1_Enter()
TextBox1 = Replace(TextBox1, " (Km²)", "")
End Sub
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox1 <> "" Then TextBox1 = TextBox1 & " (Km²)"
End Sub

 

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 6 Janvier 2015

• #5

Re : Mots répèter dans un textbox

Re,

Le probléme il est que je doit cliquer dedans. alors que j'aimerai qui s'affiche directement?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 6 Janvier 2015

• #6

Re : Mots répèter dans un textbox

Re,

pas tout compris... si tu veux qu'à l'ouverture du usf il y ait d'indiqué
" (Km²)", rajoute ceci :

Code:

Private Sub UserForm_Initialize()
TextBox1 = " (Km²)"
End Sub

 

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 6 Janvier 2015

• #7

Re : Mots répèter dans un textbox

Re,

Non sa fonctionne tojours pareil

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 6 Janvier 2015

• #8

Re : Mots répèter dans un textbox

Re,

pas compris le fonctionnement attendu... donc... mets un tout petit fichier en pièce jointe ne reprenant que le problème posé....

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 6 Janvier 2015

• #9

Re : Mots répèter dans un textbox

Bonjour Pierrot , Maval,

Je crois que sans le formulaire , c'est chercher une aiguille dans un champ de blé ....

Mais à chaque fois que tu active ton userform tu fais T7 = T7 & " (Km²)", donc si T7 contient KM2, à la seconde activation effectivement tu as Km2 Km2 .

il faudrait conditionner la concaténation : if instr(1,T7,"Km²")=0 then t7 = t7 & " (Km²)"

 

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 6 Janvier 2015

• #10

Re : Mots répèter dans un textbox

Bonsoir Nono

Sa fonctionne Nickel je te remercie et te souhaite une bonne soirée

 

Vote positif 0 Vote négatif