Я не могу заставить ваш метод работать на меня, но это, вероятно, мои настройки?
Если бы я пытался это сделать, я бы либо
- Программно загружать список по элементам
или
2i) Предположим, произвольно "J" - диапазон заполнения списка
2ii) Определите именованный диапазон, скажем "COLJ" = = Лист1! $ J $ 2: ИНДЕКС ($ J $ 2: $ J $ 65000, COUNTA ($ J $ 2: $ J $ 65000))
2ii) Скопируйте / отфильтруйте нужные элементы в J2: Jx
2ii) Назначить Listfillrange, используя VBA, myComboBox.ListFillRange = "COLJ"