Valeur textbox

bonjours a tous et toutes

juste une question

je rentre des données avec un userform

il inscrit bien ce que je marque dans l'userform

mai quant je retourne sur la feuille pour faire mes formule de calcul il ne reconnais pas le forma nombre que j'ai écrit

le code de ma textbox pour la colonne D de ma feuille

Range("D" & L).Value = TextBox2.Value

ce qui devrai donner une valeur numérique ( enfin je crois )

quelqu'un peut il m'aider

merci d'avance

Bonjour

Il faudrait voir cela avec ton fichier...

Bye !

Bonsoir,

Les textbox portent bien leur nom : Texte Boxe

Il faut faire une conversion de format pour inscrire les valeurs dans une cellule.

N'est pas ceci Amis les connaisseur d'Excel ?

@ bientôt

LouReeD

Bonsoir,

Sans fichier sous la main, essaie :

Range("D" & L).Value = CDbl(TextBox2)

merci pour votre aide

je vais tester tout cela

a bientôt

Bonjour,

Un peu plus compliqué, mais évite bien des erreurs :

Dim Sep As String, Autre As String
'détermine quel est le séparateur décimal de l'OS de l'ordi
Sep = Application.International(xlDecimalSeparator)
'si le séparateur est la virgule alors Autre = point, sinon Autre = virgule
Autre = IIf(Sep = ",", ".", ",")
'si le textbox n'est pas vide
If TextBox2 <> "" Then
    'on convertit en double (numérique) la chaine du textbox dans laquelle
    'on a remplacé une éventuelle erreur de saisie du séparateur décimal
    Range("D" & L).Value = CDbl(Replace(TextBox2, Autre, Sep))
Else
    'si textbox vide alors cellule = 0
    Range("D" & L).Value = 0
End If

ok merci pour les réponse je vais tester tout cela

merci a tous et a bientôt