ich habe eine Userform erstellt, die auf meinen Bilschirmen komplett zu sehen ist, auf anderen Rechnern ist nur ein Teil zu sehen.
Was kann ich tun, daß die komplette Ansicht bei anderen User angezeigt wird?
Gruß
Peter
Sub UserForm_ganzeSeite()
UserForm1.Show
With UserForm1
.Height = Application.Height
.Width = Application.Width
End With
End Sub
Private Sub UserForm_Initialize()
Dim intWidth As Integer, intHeight As Integer
intHeight = GetSystemMetrics(SYS_Height)
intWidth = GetSystemMetrics(SYS_Width)
With UserForm1
.Height = intHeight
.Width = intWidth
End With
End Sub