Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres Transformer dans mon userform un format "texte" en format "nombre"

A

alain.pierrephie

XLDnaute Occasionnel
Bonjour au forum
J'ai un souci que je pensais pouvoir régler seul mais que je n'arrive pas à régler
J'ai mis un fichier excel qui n'est pas mon dossier mais des copié / collé de mon dossier trop gros pour être mis ici.
Toutes les explications sont aussi écrites.
En gros,
j'ai fait un userform dans lequel je met un nombre qui doit être placé dans un formulaire aussi en nombre mais qui le met en texte malgré un code "currency" que j'ai mis. Tous les copié/collé concernant ce userform sont dans ce dossier que je vous transmet.
Merci a celui ou ceux qui se pencheront sur mon cas
 

Pièces jointes

  • pour downloads excel.xlsx
    360.7 KB · Affichages: 12
Trier par date Trier par votes

ChTi160

XLDnaute Barbatruc
Bonjour alain
je pense que tu devrais mettre un fichier ou l'on peut trouver ton Userform et ses codes associés (sans données confidentielle)
en l'état tu risque de ne pas avoir de réponse . les images n'aide pas beaucoup dans ton cas !
Remarque il ne faut pas rentrer tes Chiffres (texte) avec le € mais formater ta colonne avec le Chiffre plus
exemple "# ##0,00 €"

jean marie
 

Pièces jointes

  • testMonaitaire1.gif
    28.6 KB · Affichages: 25
Dernière édition:
Vote positif 0 Vote négatif
A

alain.pierrephie

XLDnaute Occasionnel
Pas bien compris
 
Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc
Bonjour.
Arrêter de toujours parler de format à tort et à travers. Les cellules ont bien un format d'affichage, mais leurs valeurs n'en ont pas. Ce que leur valeurs ont, c'est un type de donnée.
Principalement Double, Boolean, String, Empty ou Error. Bien qu'ils ne soient jamais réellement enregistrés que sous forme de Double, ces derniers peuvent aussi être restitués à VBA sous forme de Date ou de Currency. Utiliser les fonction CDbl, CDate ou CCur pour convertir en numériques un String destiné à une Value de cellule.
 
Vote positif 0 Vote négatif
A

alain.pierrephie

XLDnaute Occasionnel
Et pratiquement je fais quoi et comment ?
 
Vote positif 0 Vote négatif
A

alain.pierrephie

XLDnaute Occasionnel
alain.pierrephie à dit:
J'essai cela et reviens vers vous. Merci
Cliquez pour agrandir...
Ça marche pas, rien en + ou -. Maintenant je le place peut être au mauvais endroit. Je l'ai placé là

Private Sub UserForm_Initialize()
Dim numligne As Long
numligne = Range("numeroligne")


If IsNumeric(versement1.Text) Then Cells(X, Y).Value = CCur(versement1.Text)




'MsgBox numligne


Me.nomnaissance = Cells(numligne, 1)

Me.somme = Format(Cells(numligne, 24), "currency")
Me.versement1 = Format(Cells(numligne, 25), "currency")
Me.versement2 = Format(Cells(numligne, 26), "currency")
Me.versement3 = Format(Cells(numligne, 27), "currency")
End Sub
 
Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc
Les contrôles ne peuvent jamais contenir de donnée numérique. Toujours que String pour ceux pour lesquels ce n'est pas Boolean. Je parlais de la conversion inverse, à destination d'une cellule, parce que c'est généralement là que beaucoup ont du mal à comprendre pourquoi ils y retrouvent des textes au lieu des nombres. Quel problème rencontrez vous ? Et en spécifiant à la fonction Format "0.00 €" au lieu de "currency" ?
 
Vote positif 0 Vote négatif
A

alain.pierrephie

XLDnaute Occasionnel
Le problème que je rencontre est détaillé dans mon 1er post dans le dossier excel joint. Merci
 
Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc
N'oubliez pas: ça ne changera rien au risque que les TextBox qui afficheront du fait de la modif "60,00 €" et "30,00 €" soient enregistrées en tant que texte dans les cellules si vous oubliez, à la sauvegarde, de les reconvertir en Currency à l'aide de la fonction CCur.
 
Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc
Bonjour le forum
Bonjour alain.pierrephie, bonjour Jean Marie, bonjour Dranreb

IL est vrai qu'avec le fichier cela eut été mieux mais bon. Je me risque avec cette version qui peut être, n'est pas celle recherchée.

Bonne fin de ouikand à toutes & à tous.
@+ Eric c
 

Pièces jointes

  • Classeur2.xlsm
    19.1 KB · Affichages: 19
Vote positif 0 Vote négatif
A

alain.pierrephie

XLDnaute Occasionnel
Whaou !!! punaise grace a ton exemple avec le code CDbl j'ai pu faire ce que je voulais. Effectivement pour les non initiés dire >> essai le code CDbl << c'est sympa mais !! ou le mettre a quelle place etc... Cela fait 2 jours que je suis dessus et ce soir j'y suis arrivé. J'ai un mini souci encore mais je vais crééer une discussion. Merci a toi l'ami Eric passe une bonne soirée tu vas bientôt attérir à Travailland. Courage
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

H
  • Question Question
Autres Retirer un code de format personnalisé
Réponses
1
Affichages
107
JHA
J
A
  • Résolu(e)
Autres Afficher le nombre de dates d'une colonne par rapport à une cellule
Réponses
4
Affichages
115
alain.pierrephie
A
S
  • Question Question
Microsoft 365 Calculer nombre d'invités
Réponses
4
Affichages
488
Laurent78
L
  • Question Question
Microsoft 365 [RESOLU] Gestion en masse de fichiers JPG selon sélection sur un tableur
Réponses
4
Affichages
354
ralph45
  • Question Question
Microsoft 365 vba : pb format de variable
Réponses
1
Affichages
330
wDog66
Y
  • Question Question
XL 2010 compter nombre des labels de format texte non vide
Réponses
2
Affichages
568
yahya belbachir
Y
  • Question Question
XL 2016 Detection Format
Réponses
8
Affichages
635
crocrocro
C
J
  • Question Question
Microsoft 365 Enregistrer une image dans un dossier
Réponses
5
Affichages
670
job75
T
  • Question Question
XL 2016 Preparer mon publipostage avant export
Réponses
0
Affichages
88
tuti
T
N
  • Résolu(e)
Microsoft 365 Aide pour insertion nombre aléatoire
2
Réponses
22
Affichages
810
NONO14
N
M
  • Résolu(e)
XL 2013 VBA enregistrement fichier dans un dossier en particulier
Réponses
3
Affichages
332
MarineU
M
  • Question Question
XL 2021 Ajout de zones dans un USF par VBA
2
Réponses
16
Affichages
218
jeff1494
  • Résolu(e)
XL 2010 Sauts de page
2
Réponses
18
Affichages
928
TooFatBoy
T
  • Question Question
Microsoft 365 Afficher un texte sur l'axe des abscisse d'une courbe
Réponses
3
Affichages
183
chris
S
  • Question Question
XL 2016 Récupérer un nombre dans une cellule pour l'inclure dans une formule
Réponses
4
Affichages
398
shushen
S
T
  • Résolu(e)
Microsoft 365 Exporter les plages nommées vers un nouveau classeur - plage nommée invalide selon VBA
Réponses
2
Affichages
105
tnion
T
C
  • Question Question
XL 2021 Mettre en couleur un texte dans listbox
Réponses
9
Affichages
354
ChTi160
P
  • Question Question
Microsoft 365 Aide pour création fiche de paie en fonction de mon planning
Réponses
2
Affichages
281
Po-p0/59
P
J
  • Question Question
Microsoft 365 macro qui ouvre des fichiers excel de type "analyze in excel" généré par power bi et met à jour un filtre "mois" sur plusieurs tcd
Réponses
0
Affichages
91
JJ69
J
D
  • Question Question
Microsoft 365 Cellule multiligne dans fichier texte.
Réponses
2
Affichages
354
sylvanu
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…