cellule value o,oo

bonjour j'ai ceci quand je valide sur une cellule vide cela me mets 0.00
es que l'on peu avoir vide si la cellule est vide

Code:

---

Range("I" & ligne).Value = Val(Replace(TextBoxRecettes.Value, ",", "."))

---

mais avec Replace merci

Si j'ai bien compris la question, alors, ton code devrait être

Code:

---

1 2	If Not IsEmpty(Range("I" & ligne).Value) Then _ Range("I" & ligne).Value = Val(Replace(TextBoxRecettes.Value, ",", "."))

---

le probleme c'est que je ne peu mettre un valeur cela me la vide ?c'est cela a quelque chose pret

Citation:

---

Envoyé par pilounet54

es que l'on peu avoir vide si la cellule est videi

---

Bonjour,

Ce n'est pas très clair... ça ne serait pas plutôt maintenir la cellule vide si la TextBoxRecettes est vide ?

oui bien sur ,la precision du detail me fait avance merci de la remarque
es que vous avez une solution cordialement patrick

Citation:

---

Envoyé par defluc

Si j'ai bien compris la question, alors, ton code devrait être

Code:

---

1 2	If Not IsEmpty(Range("I" & ligne).Value) Then _ Range("I" & ligne).Value = Val(Replace(TextBoxRecettes.Value, ",", "."))

---

---

le code ne fonctionne pas es que tu aurai une autre idee merci
maintenir la cellule vide si la TextBoxRecettes est vide ?

Bonjour

Citation:

---

maintenir la cellule vide si la TextBoxRecettes est vide ?

---

D’après ta dernière remarque je pense que tu devrais essayer ceci

Code:

---

1 2	If TextBoxRecettes.Value <> "" Then _ Range("I" & ligne).Value = Val(Replace(TextBoxRecettes.Value, ",", "."))

---

Cordialement