kann man eigentlich eine selbsterstelle UserForm mittels einer Minimierschaltfläche in der Titelleiste an unterschiedliche Bildschirmauflösungen anpassen und wäre dies kompliziert?
Vielleicht hat jemand einen (einfachen) Tipp
Erwin
Private Sub UserForm_Initialize()
With UserForm1
.Width = Application.Width
.Height = Application.Height
End With
End Sub
Aber füge vorher einen Button in das UserForm(ular) ein, mit dem du sie Unloaden kannst.
Gruß Peter
Private Sub UserForm_Initialize()
Application.WindowState = xlMinimized
With UserForm1
.Width = Application.Width
.Height = Application.Height
End With
End Sub