FvR, а где вы такую интересную форму нашли? На каком-то форуме? Дайте ссылочку, пожалуйста. Очень хотелось бы положить такую форму в свою "копилку", но надо сначала разобраться как она работает. А там в коде, похоже, какие-то не понятные "хвосты" от каких-то имевшихся на ней ранее элементов управления...
С уважением, Алексей(ИМХО: Excel-2003 - THE BEST!!!)
Ну, я так и предполагал, что это делал скорее всего EducatedFool... Рука мастера и стиль программирования чувствуются.
В самом деле, "хвостов" нет. Это я ошибся. Просто, увидел: Private Sub UserForm_Initialize() Dim B As Boolean B = MakeFormResizable(UF:=Me, Sizable:=True) End Sub
и решил, что локальная переменная В - это остаток от чего-то, т.к. не нашёл в коде на что она влияет...
А где в коде указано ограничение минимальной ширины формы - чтобы не скрывалась кнопка Unload? И как сделать такое же ограничение по высоте? В общем, вопросов масса... Киньте ссылочку на обсуждение, плиз, чтобы я не мучил вопросами.
С уважением, Алексей(ИМХО: Excel-2003 - THE BEST!!!)