Всем привет! В файле во вложении имеются две UserForm, UserForm1 открываем с листа нажимая на CommandButton1, а UserForm2 запускаем при клике на Label1 (расположена на UserForm1). А вопрос вообщем то вот в чем, возможно ли как то закрепить появление UserForm2 точно под Label1? Т.е. при любом смещении по экрану UserForm1, UserForm2 открывалась точно под Label1.
Всем привет! В файле во вложении имеются две UserForm, UserForm1 открываем с листа нажимая на CommandButton1, а UserForm2 запускаем при клике на Label1 (расположена на UserForm1). А вопрос вообщем то вот в чем, возможно ли как то закрепить появление UserForm2 точно под Label1? Т.е. при любом смещении по экрану UserForm1, UserForm2 открывалась точно под Label1.damask_86ru
Private Sub UserForm_Activate() UserForm2.Left = UserForm1.Left UserForm2.Top = UserForm1.Top + UserForm1.Height + 10 End Sub
[/vba] 10 - подбираете вручную Там, правда, было бы неплохо добавить проверку на то, чтобы ЮФ2 не падала ниже границы окна. Поищите в интернете, там этого добра куча
Так нужно? [vba]
Код
Private Sub UserForm_Activate() UserForm2.Left = UserForm1.Left UserForm2.Top = UserForm1.Top + UserForm1.Height + 10 End Sub
[/vba] 10 - подбираете вручную Там, правда, было бы неплохо добавить проверку на то, чтобы ЮФ2 не падала ниже границы окна. Поищите в интернете, там этого добра куча_Boroda_
Спасибо за внимание! Почти так), но не так... На UserForm1 расположена Label1, вот к ней надо привязать UserForm2. Такое возможно, учитывая что Label1 находится в MultiPage?
Спасибо за внимание! Почти так), но не так... На UserForm1 расположена Label1, вот к ней надо привязать UserForm2. Такое возможно, учитывая что Label1 находится в MultiPage?damask_86ru