textbox vers cellule automatique ?

[moitoine]

Bonjour,

J'aimerais savoir s'il est possible de donner un instruction en VBA pour qu'une fois la maxlength d'une textbox atteinte le contenu soit transferé directement vers une cellule ? (en utilisant le même principe que l'autotab, par exemple)

 

[pierrejean]

Re : textbox vers cellule automatique ?

bonjour toi toine

vois cet essai pour remplir la colonne A de codes a 5 caracteres

ci dessous les Vba:

Private Sub TextBox1_Change()
If Len(TextBox1) = TextBox1.MaxLength Then
  Range("A" & n) = TextBox1
  n = n + 1
  TextBox1 = ""
End If
End Sub
Private Sub UserForm_Initialize()
n = 1
End Sub

et dans module1:

Public n As Integer

 

[moitoine]

Re : textbox vers cellule automatique ?

c'est exactement ce que je voulais,

Merci beaucoup