Bonjour,
Mon problème concerne l'utilisation d'un TextBox en VBA Excel.
J'en utilise d'autres sur plusieurs programme et celui-ci ne fonctionne pas normalement.
Pour chaque caractère inscrit, une ligne s'ajoute dans le fichier concerné avec pour la
première ligne le premier caractère, puis les deux pour la deuxième lignes, etc.
Citation :
Private Sub Ob_cre_Change()
Lab_txt.Visible = True
Tb_cre.Visible = True
Cmd_valid.Enabled = True
Cmd_quit.Enabled = True
With Tb_cre
.SetFocus
.SelStart = 0
End With
End Sub
Private Sub Tb_cre_Change()
MaxLength = 40
txt1 = Tb_cre.Value
dl = dl + 1
Sheets("Abt" ).Cells(dl, 3) = txt1
|
Ci-dessus, le code concerné.
Merci d'avance pour toute réponse.