Vba "nombre dans cette cellule est au format texte"

Résolu

noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention -
noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention - 17 août 2020 à 00:26

Salut les amis,
Dans un userform je saisis des valeurs dans les textbox pour les transférer ensuite par une commande VBA dans les cellules du classeur "Range("B5").Value = TextBox1.Value" , mais dans les cellules un message apparaît "nombre dans cette cellule est au format texte"
j'ai essayé de corriger ce code pour que les valeurs seront transmis au format nombre :

Range("B5").Value = TextBox1.Value

par :

Range("B5").Value = val(TextBox1.Value)

Range("B5").Value = cnum(TextBox1.Value)

mais le résultat est le même
Merci d'avance

Configuration: Windows / Chrome 84.0.4147.125

A voir également:

Vba format texte
Format epub - Guide
Format factory - Télécharger - Conversion & Codecs
Format apfs - Guide
Hp usb disk storage format tool - Télécharger - Stockage
Transcription audio en texte word gratuit - Guide

4 réponses

Réponse 1 / 4

Yoyo01000 Messages postés 1639 Date d'inscription Statut Membre Dernière intervention 167

Bonsoir,

la commande

Range("B5").Value = TextBox1.Value

est la bonne

Le problème doit venir du format de la cellule en B5 reste à savoir pourquoi celle-ci transforme le texte en nombre.

Regardez le format de cellule avant et après l'exécution du code et regardez aussi s'il n'y a pas une ligne de code qui fait transformer le formatage de cette cellule.

Question, les nombres saisis dans la TextBox comporte-t-il des décimales ? Si oui, quel en est le séparateur ?

Réponse 3 / 4

noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention 4

salut yoyo , voila le code entier
Private Sub CommandButton6_Click()
Range("B5").Value = TextBox1.Value
Range("C5").Value = TextBox17.Value
Range("D5").Value = TextBox18.Value
Range("E5").Value = TextBox19.Value
Range("F5").Value = TextBox20.Value
Range("G5").Value = TextBox21.Value
Range("H5").Value = TextBox22.Value
Range("I5").Value = TextBox23.Value

End Sub

noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention 4

et pour effacer le contenu des textbox j'utilise :

Private Sub CommandButton7_Click()
TextBox16.Value = ""
TextBox17.Value = ""
TextBox18.Value = ""
TextBox19.Value = ""
TextBox20.Value = ""
TextBox21.Value = ""
TextBox22.Value = ""
TextBox23.Value = ""
End Sub

noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention 4 > noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention

une autre petite remarque :
pour les nombre entier pas de problème uniquement les nombres decimaux

Yoyo01000 Messages postés 1639 Date d'inscription Statut Membre Dernière intervention 167

ça ne me dit pas si les nombres entrés dans les TextBox peuvent avoir des décimales ?

Discussions similaires

Convertir texte en nombre, problème d'apostrophe Excel 2010

Transformer texte en nombre sous Excel

Formule Excel pour afficher les mois (chiffres) en lettre

Excel convertir en nombre

Supprimer l'apostrophe dans Excel

Problème format texte en nombre (VBA)

Votre réponse

Discussions similaires