USER FORM TAMPIL FULL SCREEN VBA

 

Menampilkan UserForm tampil FullScreen ,

ini scriptnya.


Private Sub UserForm_Initialize()

With Application
.WindowState = xlMaximized
Zoom = Int(.Width / Me.Width * 80)
Width = .Width
Height = .Height
End With

End Sub


note = 80 bisa di ganti sesuaikan karena ini tampil fullscreen yg bersifat zoom.
Post a Comment (0)
Previous Post Next Post