hab folgende Zeilen im Makro um die UF nicht zu verschieben.
On Error Resume Next
With Me
.Height = Application.Height
.Width = Application.Width
CommandButton1.Left = .Width / 2 - CommandButton1.Width - 200 'ganz links bei 200
CommandButton1.Top = .Height - CommandButton1.Height * 2 '1 ganz nach unten
End With
'--------------------- ab hier Dialog festlegen --------------------------
FixWindow FindWindow(vbNullString, Me.Caption)
'-------------------------------------------------------------------------
Habe mal dies im Forum gesucht.
Wieso funktioniert es nicht?
Gruß Walter