Hi
I did a simply change in form_resize, now some machine run work fine , but other show the error
A form can't be moved or sized while minimized or maximized
Form_Resize
I changed
byCode:If Me.height < 6000 Or Me.width < 6000 Then Me.height = IIf(Me.height < 6000, 6000, Me.height) Me.width = IIf(Me.width < 6000, 6000, Me.width) Me.Refresh Exit Sub End If
Code:If Me.Height < 8550 Or Me.Width < 11430 Then Me.Visible = False Me.Height = IIf(Me.Height < 8550, 8550, Me.Height) Me.Width = IIf(Me.Width < 11430, 11430, Me.Width) Me.Refresh Me.Visible = True Exit Sub End If![]()






Reply With Quote
