Tabtemp et affichage Combo en cascade

Résolu
agadio31 Messages postés 10 Statut Membre -  
agadio31 Messages postés 10 Statut Membre -
Bonjour,

En PJ fichier avec UserForm1 (Feuil1) de demarrage qui enchaine apres avec 22 autres

L'affichage des 2 1eres combo ne fonctionne plus et je pense que cela vient des Tabtemp
Les données de ces Combo sont dans Feuil2

Je ne trouve pas la solution. Aussi merci de votre aide

Fichier : https://www.cjoint.com/c/FDDuBGHwbr2

2 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    je pense que cela vient des Tabtemp Oui, mais c'est que vous avez deplace la feuil2

    Private Sub UserForm_Initialize()
    
    Dim L As Long
        'Mémoriser le tableau de données avec une colonne supplémentaire qui servira à la
        'gestion des niveaux d'alimentation des combobox
        With Sheets(2)      'attention de ne pas deplacer les onglets !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
            L = .Range("A65536").End(xlUp).Row
            TabTemp = .Range(.Cells(1, 1), .Cells(L, 5)).Value
        End With
        MAJCombo ComboBox1, 0
    End Sub
    0
  2. agadio31 Messages postés 10 Statut Membre
     
    f894009 Bonjour

    Merci de cette reponse et desolé du retard de la mienne (impordonnable je suis !)

    Effectivement cela venait simplement du fait que j'avais renommer la feuille comme un c... !!!

    Merci quand meme
    0