bonjour à tous !

j'ai un petit problème avec mon userform je souhaite effacer les valeurs que j'ai entré précédemment dans ma textbox.

J'y arrive grâce au code textbox1.value="" ou bien textbox1.text= ""

Le problème c'est que mon userform est relié à une macro qui archive les données que je rentre dans un classeur. Quand je rajoute mon code pour réinitialiser ma textbox cela bloque l'archivage.

Je voudrais un moyen de pouvoir archiver tout en réinitialisant ma textbox.

ci dessous le code de ma textbox :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub CommandButton1_Click()
Sheets("Tableau Général").Range("K2").Value = 1
UserForm1.TextBox5 = DTPicker1.Value
 
UserForm1.Hide
 
End Sub
et voici le code de mon archivage :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub Entrée()
 
    UserForm1.Show
 
    If Sheets("Tableau Général").Range("K2").Value = 1 Then
    nblignes = Sheets("Tableau Général").Range("L2").Value
    Sheets("Tableau Général").Range("B2").Offset(nblignes, 0).Value = UserForm1.TextBox1.Value

End sub


Merci d'avance