Размер формы - Microsoft Office Excel

segail · 10.07.2009, 21:29

Необходимо изменить высоту формы. Дополните код

Private Sub CommandButton1_Click()
UserForm1

Me.Width 0.33
End Sub

pivas · 10.07.2009, 21:37

Примерно так:

Код:

Sub CommandButton1_Click()
UserForm1.Width = 150 'Ширина формы
UserForm1.Height = 150 'Высота формы
UserForm1.Show 'Показать форму
End Sub

segail · 10.07.2009, 21:39

Благодарю///////////////////////

10.07.2009, 21:29	#1
segail Форумчанин Регистрация: 13.06.2009 Сообщений: 691	Размер формы Необходимо изменить высоту формы. Дополните код Private Sub CommandButton1_Click() UserForm1 Me.Width 0.33 End Sub

10.07.2009, 21:37	#2
pivas Форумчанин Регистрация: 03.04.2009 Сообщений: 412	Примерно так: Код: `Sub CommandButton1_Click() UserForm1.Width = 150 'Ширина формы UserForm1.Height = 150 'Высота формы UserForm1.Show 'Показать форму End Sub`

10.07.2009, 21:39	#3
segail Форумчанин Регистрация: 13.06.2009 Сообщений: 691	Благодарю///////////////////////