Ответ 1
Попробуйте,
listbox1.IntegralHeight=false;
listbox1.Height=some_int_number;
У меня возникли трудности с установкой высоты списка.
Код, подобный этому...
listbox1.Height = some_number;
... работает только для некоторых чисел. Кажется, что высота списка может быть только умножением высоты его элемента. Есть ли способ "переопределить" это поведение?
Попробуйте,
listbox1.IntegralHeight=false;
listbox1.Height=some_int_number;
Сначала установите
listbox1.IntegralHeight = false;
Для VBA-кода:
ActiveSheet.Shapes("ListBox1").ScaleWidth some_relate_numb, msoFalse, _ msoScaleFromTopLeft
listbox1.IntegralHeight=false
listbox1.Height=some_int_number