Autres classe de frames

TC66

XLDnaute Nouveau
j'ai une question concernant les classes

j'ai dans mon USF 12 frames chaque frame contient un textbox_mt,combobox_na,textbox_re,combobox_ba,textbox_da

i de 1 a 12 frame de i contient un textbox_mt de i ,combobox_na de i,textbox_re de i,combobox_ba de i,textbox_da de i

je souhaite les gérer dans une classe

dans ma classe j'ai mis

VB:
Option Explicit
Public WithEvents cb As MSForms.ComboBox
Public WithEvents tb As MSForms.TextBox
Private Sub cb_Change()
If cb.ListIndex <> 0 And cb.ListIndex <> 1 Then

pour chaque combobox_na de i je souhaite afficher tetbox_re de i qui est masquer lors de l'initialisation
End If
End Sub
dans mon USF

Code:
Private MesObjets() As New Classe_LigneEncaissement

Sub UserForm_Initialize()

Dim i As Byte
For i = 1 To 12
   ReDim Preserve MesObjets(1 To i)
   Set MesObjets(i).cb = Me.Controls("ComboBox_na" & i)
    Set MesObjets(i).tb = Me.Controls("TextBox_re" & i)
Next i

end sub
merci pour l'aide
 

TC66

XLDnaute Nouveau
Bonjour,
voici un extrait du fichier en question
en fait ce que je souhaite c'est que dans une classe quand un Combobox_natenc-i change
si liste index<>0 alors j'affiche textbox_refenc-i
merci d'avance
 

Pièces jointes

  • CLASSE FRAME.xlsm
    18.4 KB · Affichages: 1
Dernière édition:

TC66

XLDnaute Nouveau
Bonjour
voila je simplifie
j'ai 12 frames dans chaque frame j'ai un TB_MonEnc , CB_NatEnc, TB_RefEnc
les TB_MonEnc et CB_NatEnc sont visible
ce que je souhaite c'est de rendre TB_RefEnc visible que si le Cb_NatEnclistindex soit <>0
au lieu de faire 12 fois CB-NatEncchange(), je met ca dans une classe
merci
 

Pièces jointes

  • CLASSE FRAME.xlsm
    18.4 KB · Affichages: 3

TC66

XLDnaute Nouveau
re
une autre version de ce que je n'ai pas Compris Lol
jean marie
Bonjour ChTi160
merci pour tes messages c'est bon j'ai trouvé une solution qui marche
juste pour éclaircir deux points
1) c'est que combo nature je le remplis à l'initialisation
2) quand l'utilisateur choisi chèque ou virement il faut afficher le textbox référence pour lui permettre la saisie de la référence du chèque ou du virement

merci d'avance
 

ChTi160

XLDnaute Barbatruc
Bonjour TC66
c'est ce que je montre (sauf le remplissage Lol)
dans la Liste des modes j'ai rajouté un Vide à voir !
le Fichier !
Bonne fin de Journée
Jean marie
 

Pièces jointes

  • CLASSE FRAME Chti160.xlsm
    32.6 KB · Affichages: 3

Discussions similaires