XL 2016 Récuperer tous les TxTbox et Labels d'un Frame

patricktoulon à dit:

re
bonjour
a oui !!!!!il est beau ton userform superbe!!!!
tellement beau qu'il m'a rendu aveugle et malheureusement je le vois plus
en même temps comme c'est un xlsx ton fichier, il y a de fortes chances que je l'eusse rêvé ton userform
LOL

Cliquez pour agrandir...

Dranreb à dit:

Bonjour.
Un Frame possède une collection Controls, alors c'est simple de faire ce que vous dites.

Cliquez pour agrandir...

patricktoulon à dit:

re
bonjour
listé dans l'ordre d'appartenance et rien que les textbox et label dans les frames

VB:

Private Sub CommandButton1_Click()
    Dim ctrl As Control, ctrlf, texte
    For Each ctrl In UserForm1.Controls
        If TypeOf ctrl Is msforms.Frame Then
            texte = texte & ctrl.Name & vbCrLf
            For Each ctrlf In ctrl.Controls
                If TypeOf ctrlf Is msforms.TextBox Then texte = texte & ctrlf.Name & vbCrLf
                If TypeOf ctrlf Is msforms.Label Then texte = texte & ctrlf.Name & vbCrLf
            Next
        End If
    Next ctrl
    MsgBox texte
End Sub

Cliquez pour agrandir...

patricktoulon à dit:

Bonjour
ben dans l'event click
msgbox toto.parent.name
remplacer "toto" par le nom du control cliqué dans son event click

Cliquez pour agrandir...

Flx1er à dit:

Merci patricktoulon.
Tu m'as vraiment bien aidé.

Cliquez pour agrandir...

1. Lorsque je double clic dans un txtbox, je souhaiterais remonter tous les noms des labels dans un ordre précis d'une ligne et le nom du txtbox.
   Par ordre, j'entends pouvoir remonter, lorsque je double clic sur
   1. TxtBox_PathFile_VH (p.e.), les noms labels dans cet ordre :
      • Lbl_VH
      • Lbl_VH1
      • Lbl_VH2
      • TxtBox_PathFile_VH
   2. TxtBox_PathFile_AH, les noms labels dans cet ordre :
      • Lbl_AH
      • Lbl_AH1
      • Lbl_AH2
      • Lbl_AH3
      • Lbl_AH4
      • TxtBox_PathFile_VH
2. Lorsque je clic sur le bouton "Liste TxtBox et Label", nous remontons par Frame les contrôles qui le compose mais de façon désordonné.
   Je souhaiterais avoir par Frame tous les contrôles de la 1ere ligne puis de la 2ème et ensuite de suite, classé par label et txtbox.
   Résultat attendu :
   • Fr_IN
   • Lbl_RH
   • Lbl_RH1
   • Lbl_RH2
   • Lbl_RH3
   • TxtBox_PathFile_RH
   • Lbl_VH
   • Lbl_VH1
   • Lbl_VH2
   • TxtBox_PathFile_VH
   • ...