Динамически созданный список не распознается VBA - PullRequest
1 голос
/ 26 апреля 2020

списки создаются путем открытия CSV-файла с данными (8 столбцов, 9 строк данных)

..........................
For r = 0 To ListBoxSayisi
Set cTR = New Control
Set cTR = Me.Controls.Add("Forms.ListBox.1", "ListBox" & r + 1, True)
For i = 1 To UBound(arrX)
cTR.AddItem arrX(i, r + 1) 'r + 1
Next i
With cTR
.Width = 100: .Height = 300: .Left = (100 * r) + 50: .Top = 15
End With
.......

с последующей попыткой получить данные из этих списков

CorelDraw VBA не распознает что это "ListBoxes". Даже четко назвал на них «Listbox» и проверил, идут ли имена списков; ListBox1, ListBox2 .... по целым числам et c.

VBA никогда не признает, что они настоящие "ListBox".

Как обращаться к спискам в CorelDraw?

enter image description here

1 Ответ

0 голосов
/ 27 апреля 2020

Хорошо, я понял ...

, на который ссылались по имени, и решил эту проблему:

Me.Controls("Listbox" & i) (в скобках был важный момент);)

...