Discussion :

[Valou8u]

Bonjour,
J'ai un problème après validation avec un commandbutton : ma textbox "txtintervention" se rajoute dans la colonne A, mais me met en "nombre stocké sous forme de texte.

J'aimerai, apres le bouton valider, que la conversion se fasse automatique en NOMBRE.

j'ai recherché sur le forum, j'ai trouvé des codes avec CDbl mais impossible de l'adapter au fichier. Et j'avoue ne pas très comprendre !

Le fait est que jai une procédure "Tri_interventions" du grand au plus petit, et quand certains nombre son stocké sous forme de texte, le tri ne se fait pas correctement...

Merci par avance,

Valentin

[Philippe Tulliez]

Bonjour,
Exemple de l'utilisation de la fonction CDbl

Code :

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

Range("A13").Value = CDbl(TextBox1.Value)

Attention que si le séparateur de décimale est un point ou contient du texte autre qu'un nombre convertible, cette syntaxe renverra une erreur.
Il y a lieu de faire un test de validité lors de l'encodage du contrôle TextBox
A lire le chapitre II-E. TextBox du tutoriel Utiliser les contrôles dans un UserForm, en VBA Excel

[Valou8u]

Alors, ça concerne une colonne complete en rows.count. mes nombres sont simples : 1,2 etc jusqu'a 124 pour l'instant. Par de virgule, pas de point.

Mais j'aurai voulu savoir si je le place dans le commandbutton valider, a la fin de la procédure ?

[Valou8u]

Voici ce que j'ai essayer de faire dans ma procédure cmdValider_click() :

Code :

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

1
2
3
4
5
 With ThisWorkbook.Worksheets("Maintenance")
   i = .Range("A1").CurrentRegion.Rows.Count + 1
 
   .Cells(i, 1) = CDbl(Maintenance.txtintervention)
End With

Donc pour forcer toute la colonne a convertir en nombre. Il n'y a pas d'erreur, en revanche, ça ne marche pas ! la nouvelle entrée reste en "Nombre sous format texte"

Merci,

Valentin

[Menhir]

mes nombres sont simples : 1,2 etc jusqu'a 124 pour l'instant. Par de virgule, pas de point.

Dans ce cas, ce n'est pas d'un CDbl dont tu as besoin mais d'un CInt.
Regarde ces deux fonctions dans l'aide VBA d'Excel.

Il n'y a pas d'erreur, en revanche, ça ne marche pas !

Les deux parties de cette phrases se contredises l'une l'autre.

Je pense qu'il y a une chose que tu n'as pas comprise : le premier argument de Cells ne donne pas le nombre de lignes à traité mais le numéro de la ligne à traiter.
Donc mettre dans i un Rows.Count est un peu étrange.

Mais comme je n'ai pas compris exactement ce que tu veux faire, difficile d'en dire plus.

[Valou8u]

Bonjour,

Je recapitule : j'ai un bouton "nouveau" dans lequel je rentre des informations. Une fois ces infos rentré, je valide. Ça met les infos a la derniere ligne de mon tableau excel. Au moment de l'entrée de la ligne, je voudrai que dans la colonne 1, ce soit un nombre (du coup le 1,2, jusqu'a 124, en fait il s'incremente automatiquement, mais il se met en "nombre stocké sous format texte" et je voudrai qu'il soit convertie en format nombre). Et je ne sais pas quoi mettre pour la valeur de i, ni comment écrire le code...

J'espere avoir été assez clair cette fois ci.

Merci par avance,

Valentin