Liaisons entre les différents éléments d'un Userform

Bonjour à toutes et à tous et j'espère que vous allez bien.

J'ai longuement réfléchis à comment rendre les différents éléments que j'introduis dans un userform corrélés.

Je m'explique :

Un TextBox qui variera en fonction d'une Listbox (qui elle reçoit les données depuis un tableau d'un autre classeur Excel)

Une ComboBox qui en fonction de la valeur choisie, permettra de masquer/rendre visible les autres éléments de l'userform et qui par ailleurs changera aussi sa longueur/largeur suivant le choix.

Est-ce possible d'avoir ces interactions? Merci de m'éclairer sur le programme suivant :

Private Sub ComboBox16_AfterUpdate()

    ' Nature :
    ' Si la sélection est : Transfo
    If ComboBox16.Value = Sheets("<DATA>").Range("C4") Then
        ' Ukr
        ' Fonction recherchev() en vba est : VLookup() et clng (caractère long), DATAB = Range("B2:O19")
        Me.TextBox2 = Application.VLookup(CLng(Me.ComboBox17), Sheets("<DATA>").Range("DATAB"), 4, 0)
    ' Sinon si la sélection est : Groupe
    ElseIf ComboBox16.Value = Sheets("<DATA>").Range("C6") Then
        ' Ukr
        ' Grissailler la valeur de "Ukr"
        Me.TextBox2.Enabled = False
    ' Sinon si la sélection est : BT par ICC
    ElseIf ComboBox16.Value = Sheets("<DATA>").Range("C6") Then
        ' Ukr
        ' Grissailler les valeurs de "Puissance", "Nb Sources" et "Ukr"
        With Me
            .ComboBox17.Enabled = False
            .ListBox18.Enabled = False
            .ListBox19.Enabled = False
            .TextBox2.Enabled = False
            .TextBox2.Enabled = False
            .Label_Intensite.Enabled = True
            .Label_Courant.Enabled = True
            .TextBox5.Enabled = True
        End With

    Else
        .ComboBox17.Enabled = True
        .ListBox18.Enabled = True
        .ListBox19.Enabled = True
        .TextBox2.Enabled = True
    End If

End Sub

Nature est l'élément déclencheur qui en fonction du choix fait, permettra à Ukr de modifier sa valeur/visibilité.

Notons que ce programme me génère une erreur que je ne comprend pas : "Erreur d'exécution '13' : Incompatibilité de type"

Merci par avance de votre aide.

PJ : Images de mon userform avec/sans étiquettes ainsi que le tableau de données (situé dans un autre classeur)

ap06

https://zupimages.net/viewer.php?id=20/15/ap06.png

https://zupimages.net/viewer.php?id=20/15/xkoe.png

https://zupimages.net/viewer.php?id=20/15/mh1b.png

Rechercher des sujets similaires à "liaisons entre differents elements userform"