initialisation des combobox textbo et button

bonjour
En core qql qui me :evilred: mais bon

en appyant sur un bouton je souhaite reinitialise toutes les proprietes de mes objets(mes bouton, combobox et teextbox )pour les rendre dans leur situation initial comme à l'ouverture du userform.
je lance la command UserForm_initialize()
mais j'ai un peu n'importe quoi ???????:aie:

voila la procedure init

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51

Private Sub UserForm_initialize()   'initialisation des textbox 'initialisation combobox RAZ   'rend inactif des combobox ComboBox1.Enabled = False ComboBox2.Enabled = False ComboBox3.Enabled = False ComboBox4.Enabled = False ComboBox5.Enabled = False ComboBox6.Enabled = False 'ComboBox7.Enabled = False ComboBox8.Enabled = False ComboBox9.Enabled = False 'ComboBox10.Enabled = False 'ComboBox11.Enabled = False 'ComboBox12.Enabled = False ComboBox13.Enabled = False ComboBox14.Enabled = False ComboBox15.Enabled = False ComboBox16.Enabled = False ComboBox17.Enabled = False ComboBox18.Enabled = False ComboBox19.Enabled = False 'ComboBox20.Enabled = False 'ComboBox21.Enabled = False ComboBox22.Enabled = False ComboBox23.Enabled = False ComboBox24.Enabled = False ComboBox25.Enabled = False ComboBox26.Enabled = False   'rend inactif les texbox TextBox1.Enabled = False     'initialisation des variable nbfichesaisie = 0   CommandButton3.Enabled = False 'desactive le bouton validation CommandButton3.Visible = False 'rend invisible le bouton validation CommandButton7.Enabled = False 'desactive le bouton enregistrer CommandButton7.Visible = False 'rend invisble le bouton enregistrer CommandButton6.Visible = True 'rend visible le bouton recherhce CommandButton6.Enabled = True 'rend actif le bouton recherche CommandButton2.Visible = True 'rend visible le bouton saisie CommandButton2.Enabled = True 'rend actif le bouton saisie

---

Si qql a une idee ?

merci d'avance

Bonjour

Fais une recherche sur le forum avec For Each.

Cette boucle te permettra de boucler sur la collection des contrôles de ton userform.

Cet article de Silkyroad te renseignera un peu plus, et sur le forum tu trouveras de nombreux exemples.

http://silkyroad.developpez.com/vba/boucles/#LII

Starec

bonsoir starec
Normalment en appelant la procedure UserForm_initialize() on doit pouvoir intialiser le formumaire ?

Oui (encore faut-il l'appeler sans les parenthèses (), s'agissant de l'appel d'une procédure.

PS et ton RAZ , il fait quoi, exactement ?

Il faut à mon avis :

soit vider d'abord tout, puis reremplir (lourd)
soit (mieux) utiliser une variable booléenne pour que le RAZ ne se lance que la 1ère fois.

Genre :

Code:

---

1 2 3 4 5

Private Sub UserForm_Initialize() Static couic As Boolean If Not couic Then RAZ couic = True ' etc....

---

bonjour
effectivement
sans les parenthèses (), s'agissant de l'appel d'une procédure, ca fonctionne mieux .

merci


Pour RAZ ,'est une procedure qui remet à zero toutes mes variables.