Discussion :

[jeo13]

Bonjour a tous,

je saisis, via un formulaire, certaines données dans une feuille Excel.

Voici les captures d'écran:
Le formulaire
Probleme de format dans la Feuille excel

Mon souci se situe au niveau du format de la cellule "Radical".
Le nombre est enregistré sous un format texte alors qu'il devrait etre enregistré en nombre. La conséquence est que la recherche verticale pour faire afficher le nom du client correspondant ne marche pas.

Y a-t-il moyen de changer le format par code vba?

j'ai essayé le code suivant, mais rien n'y fait:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub ClientRadical_Enter()
Me.ClientRadical = Format(Me.ClientRadical, "####")
End Sub

[wilfried_42]

Bonjour

il faut utiliser les fonctions qui convertissent les textes en nombre : toute saisie dans une TextBox, comme son nom l'indique, est en format texte

Cdate ---> texte en format date ou Heure
Cint -----> Texte en Format entier simple
Clng -----> Texte en Format entier double
Csng -----> Texte en format decimal simple
Cdbl ------> Texte en format decimal double

Personellement sauf pour la date, j'utilise Val qui donne la valeur numerique d'un nombre en format text
l'avantage, si la textbox est vide, Cint, Clng, Csng, Cdbl renvoient une erreur pas val (meme resultat si on tape des lettres)
L'usage du point numerique en est neanmoins indispensable, la virgule fait perdre les decimales

Bonne journée

[jeo13]

Merci Wilfried!
Ca marche impec!