TextBox au format "nombre"

[juju3301]

Bonjour à tous,

J'ai créé un UserForm dans lequel il y a des TextBox.

Ces TextBox permettent de remplir des cellules de mon classeur.

Les valeurs que je rentre sont des nombres. Or quand je valide le remplissage de mes cellules via mon userform les données sont stockées sous forme de texte. Ci dessous le code :

Private Sub CBValider_Click()

    With ActiveCell
        .Offset(0, 32) = TBFichesEnBase
        .Offset(0, 33) = TBFichesVierges
        .Offset(0, 51) = TBIndisponibles
        .Offset(0, 53) = TBInjoignablesPermanents
    End With
    
End Sub

Des idées ?

D'avance merci.

Julien.

 

[smotty]

Re : TextBox au format "nombre"

bonjour,

utilise Val(txt).

ex:

activecell.Offset(0, 32) = val(TBFichesEnBase)

cdt

smotty

 

[PascalXLD]

Re : TextBox au format "nombre"

Bonjour

Et oui par définition les Textbox contiennent du Texte

Donc il faut convertir soit avec Val soit CDbl tout dépend si tu as des virgules ou non

 

[juju3301]

Re : TextBox au format "nombre"

Merci beaucoup, ça fonctionne