TextBox

M

Manu13

XLDnaute Occasionnel

• 2 Mars 2006

• #2

bonsoir nat

essaye ceci

Range('a2').Value = TextBox1.Value + Range('a2')

pour la deuxième question
si c'est pour éviter de saisir dedans, dans les propriété de la textbox
locked true
en espérant que cela répond à tes questions
bonne nuit
@+Manu

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 2 Mars 2006

• #3

Bonjour

pour ta première question si tu peux avoir des décimales (ce qui n'est pas le cas dans ton exemple) essaies plutôt

Range('C5').Value = Val(TextBox1.Value) + Range('C5')

ou

Range('C5').Value = CDbl(TextBox1.Value) + Range('C5')

sinon cela risque de bugger

Bonne journée

 

Vote positif 0 Vote négatif

N

nat

Guest

• 2 Mars 2006

• #4

merci pour vos réponses

dans le cas ou la cellule n'est pas sur la meme page que Userform
bonne apres midi

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 2 Mars 2006

• #5

Re

Si je comprends bien et si c'est vraiment une question tu rajoutes le nom de la feuille avant la cellule

exemple

with sheets('Feuil2')
.Range('C5').Value = Val(TextBox1.Value) + .Range('C5')
end with

ou

sheets('Feuil2').Range('C5').Value = Val(TextBox1.Value) + sheets('Feuil2').Range('C5')

 

Vote positif 0 Vote négatif