Controles des évènements sur un groupe de textboxRésolu

Question

Bon je poste ici un petit bout de code car je viens de trouver comment contr&#244;ler l'ev&#232;nement change d'un groupe de textbox.


Pour le principe, on utilise toujours une classe d'objet dans laquelle on d&#233;clare la gestion d'&#233;v&#232;nement pour le type de control.


C'est l&#224; justement que viens mon astuce. Si on d&#233;clare


public withevents TB as textbox
comme on peut le faire pour das combobox

On a l'erreur "cet objet ne g&#232;re pas automation".


L'astuce consiste donc &#224; d&#233;clarer


Public WithEvents TB As MSForms.TextBox


et l&#224;, &#231;a passe &#224; tous les coups.

Donc je r&#233;cap

un module de classe

Public WithEvents TB As MSForms.TextBox



Private Sub TB_change()
Debug.Print TB.Text
End Sub

Un userform :

Dim TextBoxGroup() As New Class1


Private Sub UserForm_Initialize()


Dim counter As Integer
For Each ctrl In Me.Controls
    If TypeName(ctrl) = "TextBox" Then
        counter = counter + 1
        ReDim Preserve TextBoxGroup(1 To counter)
            Set TextBoxGroup(counter).TB = ctrl
    End If
Next


End Sub

et voil&#224;

PCPT · Accepted Answer

salut,

si c'est une solution que tu proposes (et que tu ne voulais pas la mettre en source), il y a une rubrique trucs et astuces ;)

cs_EBArtSoft · Answer

Tu peux y arriver en cr&#233;eant une interface que tu utilisera grace a la commande "Implements"

@+


E.B.

kalobit · Answer

salut,

Si tu pouvais d&#233;velopper un peu &#231;a, &#231;a m'interresse.
En fait j'ai pas trop saisi &#224; quoi sert "implements".

kalobit · Answer

dsl, j'avais pas fait gaffe.

bon, j'ai jet&#233; un oeil sur implements, c'est assez interressant. en fait. Mais bon l'aide de vba est pas tr&#232;s claire sur le sujet donc en fait pour r&#233;sumer, &#231;a sert &#224; appliquer un mod&#232;le &#224; un module de classe.

On cr&#233;e le mod&#232;le dans un module de classe avec les property, les function et autres sub.

Dans un autre module de classe, on insert implements + le nom du modele

et voil&#224;, on peut faire appelle aux proc&#233;dure du mod&#232;le sur le module de classe sans que celui ci contienne r&#233;ellement le code. Ca c'est frot.

Merci EB

Controles des évènements sur un groupe de textbox

4 réponses

Discussions similaires