Probleme cellule

Jeremyy · 26 Février 2009

bonjour ,
voila je rempli des cellules avec des textbox d'un userform , mais voila le probleme est que quand j'écris deux fois dans la meme cellule 2 et 1 il me met "21" alors que je voudrais "3" j'ai essayé d'aditionner mais je n'ai pas réussi.

voici mon code actuel :

Code:

If Sheets(ComboBox1.Value).Range("A" & i) = CDate(TextBox4.Value) Then
Sheets(ComboBox1.Value).Range("B" & i) = Sheets(ComboBox1.Value).Range("B" & i) & TextBox1.Value
End if

Merci d'avance a tous

bonne après midi

Robert · 26 Février 2009

Re : Probleme cellule

Bonjour Jeremyy, bonjour le forum

Essaie peut-être comme ça :

Code:

If Sheets(ComboBox1.Value).Range("A" & i) = CDate(TextBox4.Value) Then
Sheets(ComboBox1.Value).Range("B" & i) = [COLOR=red]CInt([/COLOR]Sheets(ComboBox1.Value).Range("B" & i)[COLOR=red])[/COLOR] [COLOR=red]+[/COLOR] [COLOR=red]CInt([/COLOR]TextBox1.Value[COLOR=red])[/COLOR]
End if

Jeremyy · 27 Février 2009

Re : Probleme cellule

Merci Robert ,

cela fonctionne parfaitement.

Peux tu m'expliquer la fonction CInt ? ( je suis curieux )

Merci bonne journée !

Robert · 27 Février 2009

Re : Probleme cellule

Bonjour Jeremyy, bonjour le forum,

CInt convertit l'expression entre parenthèses en valeur de type Integer (entier) car parfois la récupération d'une donnée est faite sous forme de String (Texte). "2" au lieu de 2 ce qui provoque un erreur. Pour plus de renseignements tu sélectionnes CInt dans ton code et tu appuies sur la touche [F1].

Probleme cellule

Jeremyy

XLDnaute Occasionnel

Robert

XLDnaute Barbatruc

Jeremyy

XLDnaute Occasionnel

Robert

XLDnaute Barbatruc

Discussions similaires

Probleme cellule

Jeremyy

XLDnaute Occasionnel

Robert

XLDnaute Barbatruc

Jeremyy

XLDnaute Occasionnel

Robert

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency