J'essaie d'atsortingbuer dynamicment une list à chaque zone de list déroulante en fonction des valeurs d'une zone de list déroulante spécifique. L'idée est que l'user choisit une catégorie dans la combobox spécifique et toutes les autres boîtes combinées saisissent les éléments de cette catégorie sous la forme d'une list nommée.

Donc, la structure est comme

Catégories

Catégorie 1

catégorie 2

• Remplissez les cellules Excel en fonction de la valeur ComboBox
• Exécuter un sous dans le sous (dans une boucle) provoque la boîte de text TabKeyBehavior ne fonctionne pas correctement, c'est-à-dire = False
• Utilisation de Combobox pour remplir une cellule avec des fonctions et des liens externes
• VBA remplit Combobox avec du text
• VBA en bureau pour MAC

Catégorie 1

Point 1, point 2

Etc. J'ai travaillé sur un faux set de noms, mais maintenant que j'utilise de véritables gammes nommées, le code se casse. Il brise "For Each rng In ws.Range (str)" et indique que la "méthode" de la plage 'of object' _worksheet 'a échoué.

Ce code fonctionne. Ou travaillé. Ensuite, j'ai changé ws pour pointer vers une feuille différente de gammes nommées et maintenant rien ne fonctionne.

La valeur de CBOCategory est une valeur d'une list de toutes les gammes nommées, mais il semble que Excel ne voie aucune d'entre elles. J'ai essayé de triggersr même une tâche de consignation au lieu d'append chaque élément et j'ai eu une erreur similaire

Private Sub CBOCategory_Change() 'Populate dependent combo box with appropriate list items 'according to selection in cboCategoryList. Dim rng As Range Dim ws As Worksheet Dim str, temp, cbName As Ssortingng Dim counter As Integer Set ws = Worksheets("Item Master") Dim obj As OLEObject str = CBOCategory.Value For Each obj In ActiveSheet.OLEObjects If obj.Name = "CBOCategory" Then ' nothing Else temp = obj.Object.Value obj.Object.Value = "" For Each rng In ws.Range(str) obj.Object.AddItem rng.Value Next rng obj.Object.Value = temp End If 'MsgBox ("updated!") Next obj End Sub 

• Pourquoi, si je copy les cellules dans une zone de list déroulante en excel sur une nouvelle, la sélection est toujours liée et assume la dernière valeur sélectionnée?
• vba: sortinger les éléments dans la zone de list déroulante
• VBA Excel Scanning Range of Cells et remplissage avec ComboBox Selection
• VBA Combobox: colonne de remplissage / plage basée sur les valeurs sélectionnées en combobox
• Combobox réinitialise la première input "vierge" si la cellule sur la gauche est vide Erreur