textBox

[Jeremyy]

Voila mon probleme : Je souhaite que ce qui est entré dans le textbox1 soit mis en a5 mais si a5 et deja rempli que ce soir en a6 et ainsi de suite...
Voici ce que j'ai actuelement:
Range("a5") = TextBox1.Value
Mais j'ai essayé :
Range("A" & Range("A" & Cells.Rows.Count).End(xlUp).Row + 0).Select
ActiveCell.Value = TextBox1.Value

Comment faire??

 

[porcinet82]

Re : textBox

Salut,

Essais avec le code suivant :

Range("A" & Range("A65536").End(xlUp).Row + 1).Value = Textbox1.Value

@+

 

[Jeremyy]

Re : textBox

Il me l'affiche nimporte ou , la en A51 ..

 

[Jeremyy]

Re : textBox

il n'y a pas de variable a rentré? car la sa m'inquiete ce matin cela a marché ... svp

 

[Jeremyy]

Re : textBox

C'est bon , j'ai trouvé mon erreur mais bon maintenant je voudrais faire autre chose ,
En faite l'erreur venait que lorsque je n'entre pas le premier renseignement dans le 1er textbox , tout se dérégle !

Donc je voudrais savoir si il est possible d'interdir la validation si le champ du textbox1 n'est pas rempli??

 

[Jeremyy]

Re : textBox

Svp aidez moi les amis

 

[porcinet82]

Re : textBox

re,

Essais avec un code de ce genre à placer dans le code de ton bouton avant le code que je t'ai fourni avant :

If Me.Textbox1.value"" then
   Msgbox "Veuillez saisir une valeur dans le textbox1"
   Exit sub
End If

@+

 

[Jeremyy]

Re : textBox

Ton code ne marche pas ici ==> If Me.Textbox1.value"" then