Не може да се променят размерите на динамично добавения списък - vba, listbox, height, width

Търся вече часове и се надявам някой да ми помогне тук.

Създавам форма във vba, където искамдинамично добавяне на списъци. Списъкът се добавя, така че това върви по план. Обаче не мога да променя ширината и височината на списъка. Всички други неща се променят. Това е моят код:

Dim lb As MSForms.ListBox
Set lb = Me.controls.add("Forms.Listbox.1")
With lb
.ColumnCount = 4
.Left = 180
.Top = 16
.MultiSelect = 1
.Height = 270
.Width = 665
End with

Другото, което забелязах, е, че Heigth и Width не са в списъка със свойствата на ListBox. Възможно ли е да използвам грешен тип ListBox?

EDIT: Става непознат. Когато преминавам през кода по ред, той функционира нормално и размерът на ListBox е такъв, какъвто го искам.

Отговори:

Опитайте това може да е

Me.Controls ("Forms.Listbox.1"). IntegralHeight = Грешно или lb.IntegralHeight = Грешно