Tabulation incorrecte reouverture formulaire VBA

Bonjour,

Je viens de créer un programme sur Excel 2016, j'ai un UserForm que je rempli via 3 textbox. Ensuite j'ai 2 bouton ("enregistrer et nouveau";"enregistrer et fermer").

Voici le code du bouton n°1:

Private Sub CommandButton1_Click()

Application.ScreenUpdating = False
Sheets("Etat de stock").Rows("2:2").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Sheets("etat de stock").Range("A2").Value = TextBox1
Sheets("etat de stock").Range("B2").Value = TextBox2
Sheets("etat de stock").Range("C2").Value = TextBox3
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
Application.ScreenUpdating = True
UserForm_new_product.Hide
UserForm_new_product.Show

End Sub

Comme vous le voyer, il ré-ouvre le formulaire. Mon problème c'est que lors de cette réouverture, le contrôle sélectionner est le bouton de validation et non le textbox1 comme indiquer dans mon ordre de tabulation. Je souhaite que lors de cette ré-ouverture, je puisse saisir directement dans le textbox1 au lieu de devoir tabuler jusque celui-ci.

J'espère avoir réussi a me faire comprendre,

Cdt

pesupiot

Bonjour,

pourquoi le cacher et l’afficher juste après ??

en ce qui concerne le focus :

TextBox1.setFocus juste avant le "Application.ScreenUpdating = True"

Bonjour,

Merci minanse pour cette réponse rapide et efficace.

Mon problème est résolu.

Cdt,

pesupiot