valeur différente entre A1 et textbox1
#1
Débutant XLPages

Inscription: 08/10/2008
De St-Jean-sur-Richelieu (Québec, Canada))

Messages: 19

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 17-10-2008 00h39

Bonsoir le Forum;

Une toute petite question à la recherche de la grande solution...

La
cellule A1 a comme format  ''Monétaire, 2 décimales''.

Dans cette cellule (A1)  j'y inscrit 15,982.53 


Dans mon Usf  je récupère cette valeur en textbox1. Mais il affiche 15982,526

J’ai beau consulté la fenêtre ‘’Propriété’’ du textbox1, je ne vois pas où je peux

modifier ce textbox afin qu'il affiche le montant réel de la cellule A1

Merci  de votre aide et bonne soirée à tous

Michel

Hors Ligne
Rapport   Haut 

Re: valeur différente entre A1 et textbox1
#2
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 17-10-2008 12h02
Bonjour à tous,
Salut Michel,

Peut-être :
TextBox1 = Format(Range("A1"),#"," ##0.00)

Pas tester...

A+



Cordialement
Hors Ligne
Rapport   Haut 

Re: valeur différente entre A1 et textbox1
#3
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 17-10-2008 18h37
Bonsoir michel2000, JCGL, le Forum,

Moi, je pense qu'il conviendrait de nous donner le code VBA que tu utilises pour récupérer la valeur de la cellule et la mettre dans le TextBox.

Citation :
michel2000 a écrit :
Dans cette cellule (A1)  j'y inscrit 15,982.53
Es-tu sûr qu'il s'agit bien d'une saisie manuelle dans cette cellule et non d'un résultat de formule ?

Au besoin, un petit exemple reconstituant le problème serait le bienvenu...

Cordialement,

Edité par myDearFriend! le 21/10/2008 20:10:27

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: valeur différente entre A1 et textbox1
#4
Débutant XLPages

Inscription: 08/10/2008
De St-Jean-sur-Richelieu (Québec, Canada))

Messages: 19

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 18-10-2008 03h38
Bonsoir le Forum, Didier et JCGL;

Je viens de réaliser une chose: Il est aussi important de savoir bien formuler une question que d'en connaitre la solution !

Ceci dit, effectivement A1 est le résultat d'une somme et je veux afficher ce résultat dans le Usf textbox1. 

J'aimerais bien comprendre ici la différence en ce que A1 soit un résultat ou une écriture pour influencer la propriété de textbox1.

''...le code VBA que tu utilises pour récupérer...'' est le suivant

 TextBox1.Value = Sheets("Nom de la feuille").Range("A1").Value

Bien, j'inclus un exemple avec notes en zone texte pour obtenir la bonne information. Naturellement dans cet exemple les noms de cellules sont modifiés.

Merci à vous deux et bonne soirée
Michel
Pièce jointe:
zip forum_1710.zip   [ Taille: 46.75 Ko - Téléchargements: 661 ]
Hors Ligne
Rapport   Haut 

Re: valeur différente entre A1 et textbox1
#5
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 18-10-2008 04h27
Re michel2000,

Citation :
michel2000 a écrit :

Ceci dit, effectivement A1 est le résultat d'une somme et je veux afficher ce résultat dans le Usf textbox1. 

J'aimerais bien comprendre ici la différence en ce que A1 soit un résultat ou une écriture pour influencer la propriété de textbox1.

''...le code VBA que tu utilises pour récupérer...'' est le suivant

 TextBox1.Value = Sheets("Nom de la feuille").Range("A1").Value


Tout d'abord, oui : une question imprécise ne peut engendrer qu'une réponse toute aussi imprécise !

Pour la différence entre la nature d'un résultat d'une formule et une saisie directe... Je pense que tu vas vite comprendre...

Une petite expérience si tu veux bien :

Ta cellule E6 (par exemple) affiche une valeur égale à 15 982,53 $
Maintenant, tu fais un clic droit sur cette cellule E6 et tu choisis : "Format de cellule", puis onglet "Nombre", tu sélectionnes "Standard" (en haut de la liste), puis OK.

Que vois-tu dans cette cellule ?

Je pense que tu as compris : le format de cellule n'influe que sur l'affichage, mais aucunement sur la vraie valeur calculée en interne par Excel ! Ainsi, avec ton code VBA, tu récupères dans la TextBox la valeur réelle de cette cellule (propriété Value de ton Range).

Pour y remédier, tu as au moins deux solutions :

- La première, c'est JCGL qui te l'a proposée : en forçant également un format à cette valeur pour l'insérer dans la  TextBox.

- La deuxième : en utilisant la propriété Text de l'objet Range au lieu de la propriété Value.
TextBox1.Value = Sheets("Nom de la feuille").Range("A1").Text
L'inconvénient ici, c'est qu'on va également récupérer dans cette TextBox le signe monétaire ($).


Cordialement,




Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: valeur différente entre A1 et textbox1
#6
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 18-10-2008 12h58
Bonjour à tous,
Salut mDF,
Salut Michel,

Peux-tu essayer dans le code de l'USF1 :


Private Sub b_exit_usf6_Click()
UserForm1.Hide
End Sub

Private Sub TextBox2_Change()
'TextBox2.Value = Sheets("v_janvier").Range("e6").Value
TextBox2.Value = Format(Sheets("v_Janvier").Range("E6").Value, " # ##0.00\ $ ")
End Sub

Private Sub TextBox3_Change()
'TextBox3.Value = Sheets("v_fevrier").Range("E6").Value
TextBox3.Value = Format(Sheets("v_Fevrier").Range("E6").Value, " # ##0.00\ $ ")
End Sub
 

A++
A+ à tous


Cordialement
Hors Ligne
Rapport   Haut 

Re: valeur différente entre A1 et textbox1
#7
Débutant XLPages

Inscription: 08/10/2008
De St-Jean-sur-Richelieu (Québec, Canada))

Messages: 19

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 19-10-2008 00h47
Bonsoir à vous tous,
Bonsoir mDF,
Bonsoir JCGL,


Vraiment intéressant.  Oui je comprends maintenant le rôle du ''Format''. Pour tout le reste je me mets au travail en appliquant vos conseils et tenter quelques expériences.

JCGL cite....
''Peux-tu essayer dans le code de l'USF1'' ......;
Le résultat est:

Pour le TextBox2 = 15 982,53 $

Pour le TextBox3 = 7 465,84 $     

Je reviendrai pour faire part de la conclusion. Entretemps, je vous Remercie Beaucoup pour vos explications et le temps à répondre à ce fil.

Bonsoir à tous,

Michel

Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes