userform u tam ekran yapmak

Arkadaşlar , Aşağıdaki kod ile userformu tam ekran yapabilirsiniz. Private Sub UserForm_Activate() Me.Top = Application.Top Me.Left = Application.Left Me.Height = Application.Height Me.Width = Application.Width End Sub