Comment faire pour réinitialiser mon usurform des l'ouverture

bonjour.

Comme dit si bien le titre, comment faire pour réinitialiser mon usurform des l'ouverture pour qu'il sois vierge car lorsque je l'ouvre il y a des données.

merci

Salut

tu utilise .hide ou Unload UserForm1

Merci de ta réponse , à quelle endroit je le met je suppose dans Private Sub UserForm_Initialize() mais a quelle ligne car et entre quoi,

Private Sub UserForm_Initialize()
'comboBox1 modules 1  2
Unload Formulaire
If Sheets("Gestionnaire fonte").Range("I12").Value = 0 Then
MsgBox ("Veuillez sélectionner l'article à modifier")
End

Else
CbArticle.Value = Sheets("Gestionnaire fonte").Range("I12").Value
Txtlibelle.Value = Sheets("Gestionnaire fonte").Range("I17").Text
Tb_Date.Value = Sheets("Gestionnaire fonte").Range("I20").Text
Txtstock1.Value = Sheets("Gestionnaire fonte").Range("I23").Text
TxtStockminimum.Value = Sheets("Gestionnaire fonte").Range("I26").Text
Lbalerte.Caption = Sheets("Gestionnaire fonte").Range("N15").Value   'alerte
datejour = Format(Now, "DD/MM/YYYY")
N°article.Caption = Sheets("Gestionnaire fonte").Range("I7").Text   'N°article Lbnombresarticle
Lbnombresarticles.Caption = Sheets("Gestionnaire fonte").Range("P7").Text   ' Lbnombresarticle

End If
End Sub

jai effectuer plusieurs test cela me fais erreur

merci

Salut

pour quoi ça :

CbArticle.Value = Sheets("Gestionnaire fonte").Range("I12").Value
Txtlibelle.Value = Sheets("Gestionnaire fonte").Range("I17").Text
Tb_Date.Value = Sheets("Gestionnaire fonte").Range("I20").Text
Txtstock1.Value = Sheets("Gestionnaire fonte").Range("I23").Text
TxtStockminimum.Value = Sheets("Gestionnaire fonte").Range("I26").Text
Lbalerte.Caption = Sheets("Gestionnaire fonte").Range("N15").Value   'alerte
datejour = Format(Now, "DD/MM/YYYY")
N°article.Caption = Sheets("Gestionnaire fonte").Range("I7").Text   'N°article Lbnombresarticle
Lbnombresarticles.Caption = Sheets("Gestionnaire fonte").Range("P7").Text   ' Lbnombresarticle

sur ma feuille de code je le place ou?

effacer le comme ca :

Private Sub UserForm_Initialize()

End Sub

Merci Amir mais je ne voie pas

je mais quelle que chose devant ,je suppose juste apprès

Private Sub UserForm_Initialize()

End Sub

ex Private Sub UserForm_Initialize()

Unload Formulaire

If Sheets("Gestionnaire fonte").Range("I12").Value = 0 Then

je mais devant

merci de votre compréhension

non juste vide

Private Sub UserForm_Initialize()

End Sub

merci mais je ne peu avoir 2

Private Sub UserForm_Initialize()

lorsque je crée un autre évidement erreur

lorsque je le place dans le

Private Sub UserForm_Initialize() existant

je le place ou au debut avec quelle que chode devant ou rien

juste effacer cet évènement et dit moi ce que tu résulte :

Private Sub UserForm_Initialize()

End Sub

Ok super cela à marcher merci AMIR

tu vois il était simple !