Vider des textbox en code VBA boucle

salut

dans mon userform il y a plusieurs textbox, (13) , j'ai mis ce code boucle pour les vider,et tout fonctionne, mais le problème c'est que mes textbox ont tous des nom par exemple (textbox1 qui contient nom prénom je l'ai nommé "nom_pren" ainsi de suite, alors là la boucle que j'utilise ne fonctionne pas.

merci pour votre aide

cordialement abdellah.

For x = 1 To 13
Controls("textbox" & x).Value = ""

Next

Bonjour,

Dans ce cas il faut utiliser

Dim Ctrl As Control

For Each Ctrl In Me.Controls
    If TypeOf Ctrl Is MSForms.TextBox Then Ctrl.Value = ""
Next Ctrl

@+

merci sa fonctionne bien comme sur des textbox et combobox

mais quand je l'ai fais pour DTPicker1 ca na rien donnée.

Dim Ctrl As Control

For Each Ctrl In Me.Controls
    If TypeOf Ctrl Is MSForms.TextBox Then Ctrl.Value = ""
Next Ctrl

'pour combobox

For Each Ctrl In Me.Controls
    If TypeOf Ctrl Is MSForms.ComboBox Then Ctrl.Value = ""
    Next Ctrl

'pour DTPicker ?? pas de resultat 

For Each Ctrl In Me.Controls
    If TypeOf Ctrl Is MSForms.DTPicker Then Ctrl.Value = ""
    Next Ctrl

Bonjour,

Il faudrait commencer par comprendre les base de la programmation et l'autocomplétion

SI VBAProject ne propose pas la propriété, c'est qu'il ne sait pas la gérer

C'est le cas pour les DTPicker qui n'est pas un control VBA mais une bibliothèque supplémentaire Windows

Dans ce cas, il faut jouer sur le nom ou le tag du control

Il y a pleins de tutos à ce sujet.

merci pour votre aide

Bonjour,

Avec un bout de code difficile de se rendre compte de l'utilisation que tu souhaites en faire ?

vider textbox , combobx, dt picker ? pour réinitialiser le userform ?

Dans ce cas à la fin un simple

 Unload Me
 'suivi d'un nouveau
UserForm1.Show 
 

et le tout sera remis à "zéro"