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
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen