DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub UserForm_Activate()
Me.Left = Application.Width - Me.Width
Me.Top = 0
End Sub
maximize yapmak içindeçünkü XL uygulamasının "Maximize ekran" modunda olmasını gerektirir.
Private Sub UserForm_Activate()
Application.WindowState = xlMaximized
Me.Left = Application.Width - Me.Width
Me.Top = 0
End Sub