Affichage textbox

[hidozo]

Bonjour,

J'ai 2 textbox avec des codes de type:

Worksheets("Feuil1").Select
Me.TextBox4.Value = "Evaluation numéro " & [ac9]

J'ai un seul bouton qui me premt de valider mon traitement et d'afficcher les valeurs dans les 2 textboxs avec le code de type suivant :

textbox4 = valeur

Pour une des textbox, la mise à jour dse fait sans souci, pour l'uatre non. Avez-vous déja rencontré ce problème et comment le résoudre ?

Cordialement

Hidozo

 

[Eric 45]

Re : Affichage textbox

Bonjour à tous
Bonjour hidozo

Je ne pense pas que tu puisses avoir de "nommées" 2 "TextBox4". Vérifie, le problème doit venir de là

Eric

 

[hidozo]

Re : Affichage textbox

Non, c'est vrai,
j'en ai une textbox4 et une textbox11

textbox4
Worksheets("Feuil1").Select
Me.TextBox4.Value = "Evaluation numéro " & [ac9]
end sub


textbox11
Worksheets("Feuil1").Select
Me.TextBox11.Value = [ac12] & " %"
end sub


Voila !!!!

je me demande si dans une des propritéts il n'y aurait pas quelque chose qui gênerait l'affichage.

A plus

Hidozo

 

[Eric 45]

Re : Affichage textbox

Re

Chez moi cela fonctionne. Essaie cela :

Private Sub UserForm_Initialize()
TextBox4.Value = "Evaluation numéro " & Worksheets("Feuil1").Range("ac9").Value
TextBox11.Value = Worksheets("Feuil1").Range("ac12").Value & " %"
End Sub

Eric

 

[hidozo]

Re : Affichage textbox

Alors, après quelques tests, cela fonctionne, mais ce qui est surprenant :

textbox4 : je n'ai rien modifié.

Quand je cliquue sur le bouton valider (code : textbox4 = valeur) ça fonctionne.

pour la textbox11, pour que cela fonctionne, je dois rajouter dans le code du bouton le même code que pour la textbox !!!! bizarre non ?

Le plus imôrtant c'est que cela fonctionne, je chercherai après à essayé de comprendre.

Cordialement

Merci

 

[hidozo]

Re : Affichage textbox

2 petites questions :

- est-ce que : Range("ac9").Value a la même signification que [ac9] ???

- dans ma textbox, je ne veux afficher que 2 décimale. J'ai trouvé l'argument Numdigitsdecimal, mais absoulment pas comment l'intérgrer dans ma textbox11.

Cordialement

hidozo

 

[Eric 45]

Re : Affichage textbox

Re

Je ne me sers pas de [...], donc je ne peux pas te répondre exactement.

Par contre, si tu ne veux afficher que 2 décimales = 5,45, essaie : :

Range("ac9").Text

au lieu de

Range("ac9").Value

ce qui récupère le "texte affiché" de ac9 (si format de ac9 => Nombre - nombre de décimales = 2)

Eric

 

[hidozo]

Re : Affichage textbox

Re,

text au lieu de value, ça marche du tonnere.

Je pense que je vais utilisé a ligne de code pour récupérer les infos, car dans l'esprit la textbox = une donnée

alors quand dans mon code à moi, je sélectionne une feuille et ensuite textbox = donnée. cela m'oblige à sortir de la feuille ensuite.

c'est de l'optimisation qu'il me manque, mais comme je débute, j'avance doucement.

Cordialement

hidozo

 

[hidozo]

Re : Affichage textbox

Problème résolu