Selectionne un textbox

Bonsoir,

J'ai fais une sorte de caisse enregistreuse avec un userform. Quand je selection un produit dans ma casse "TEXTBOXSCAN", j'ai ecris un code pour qu'il me trouve comment s'appel le produit et combien il coute.

Je voudrais que a chaque fois que je finis de scaner les produit, je puisse scane un autre. Je pense que je pouve ecrire "me.textboxscan.setfocus" mes ca ne marche pas...

C' est ce que j'ai ecris:

Private Sub TEXTBOXSCAN_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Sheets("TICKETCAISSE").Activate
With Sheets("TICKETCAISSE")
If Me.Q13.Value = "" Then
range("G31") = 1
Else
range("G31") = Me.Q13.Value
End If
Me.Q13 = ""
range("F2") = Me.TEXTBOXSCAN.Value
End With
With Me
Me.Label1 = Sheets("ticketcaisse").range("F20").Value
.TextBox1.Value = Sheets("TICKETCAISSE").range("G2").Value
Me.TEXTBOXSCAN = ""
Me.TEXTBOXSCAN.SetFocus
End With
Me.TEXTBOXSCAN.SetFocus
End Sub

Quelqu' un a une idee que puis-je ecrire?

N.B- Je travaille sur Excel2016

Merci beaucoup

Bonjour et bienvenu sur le forum

Un fichier est TOUJOURS le bienvenu

A+ François

Merci d'avoir pris votre temps pour me repondre

entre temps j'ai trouve comment faire

il fallait ue j'ecrives

textbox1=""

cancel=true

encore merci pour le temps que vous avez prit pour me repondre

Rechercher des sujets similaires à "selectionne textbox"