Contrôler un Userform par module de Class

Bonjour, je reviens vers vous toujours pour les modules de class que j'ai vraiment du mal à maîtriser:

J'ai un userform "Menu" dans lequel il y a 100 textbox. J'ai créé ClassSaisie pour gérer le remplissage des box "TxtBox" et cela fonctionne bien.

Maintenant je voudrais par une méthode dans ma Class effacer l'ensemble de mes TxtBox.

Dans ClassSaisie, j'ai crée Public Sub EffacerTout.

Mon problème dans le module qui va gérer l'effacement comment faire ?

For Each ????? In Menu.Controls

???????

Next ??????

Merci de votre aide

Michel

Bonjour,

Tu n'est pas obligé d'utiliser un module de classe pour vider les TextBox. Dans le module de la Form, code lié à un CommandButton :

Private Sub CommandButton1_Click()

    Dim Txt As Control

    For Each Txt In Me.Controls

        If TypeName(Txt) = "TextBox" Then Txt.Text = ""

    Next Txt

End Sub

Hervé.

Votre réponse n'est pas celle que j'espérais ;mais ma question a été sûrement mal rédigée.

En fait, j'aimerais vraiment savoir comment on ferait cela en utilisant un module de Class car je souhaite mieux comprendre la façon de faire car je vais en avoir besoin pour faire des choses plus complexes par la suite.

Merci tout même pour votre intervention

Michel