Probleme avec textebox

Fermé
maalxe Messages postés 6 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 20 janvier 2014 - Modifié par maalxe le 16/01/2013 à 17:34
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 - 16 janv. 2013 à 19:41
j'ai encord un problème...:( tout fonctionne me si j'ajoute la ligne me.tb_scan.text = clear un message d'erreur survien. Ce que j'éssais de fair est de vidé ma textbox une foie le produit scanné pour pouvoir en scanné un nouveau. Merci si vous pouvez m'aidé


Private Sub tb_scan_Change()

For Each c In Range([B2], [B65000].End(xlUp))


If c.Offset = CDbl(Me.tb_scan) Then

Me.lb_code_produit = c.Offset(0, 1).Value
Me.lb_description = c.Offset(0, 2).Value
Me.lb_qty = c.Offset(0, 3).Value
Me.lb_poids = c.Offset(0, 5).Value

Me.tb_scan.Text = Clear

End If

Next c

End Sub

1 réponse

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
16 janv. 2013 à 19:41
Bonjour,
Raz selection:
Me.tb_scan.Text = ""
0