Yazdığım kodlar aşağıda ama sanırım bir yerlerde yanlışlık var UserForm tam ekran olarakl açılmıyor.Lütfen yardımcı olurmusunuz
Sub Autpen()
UserForm1.Show
End Sub
Private Sub UserForm1_Initialize()
With Application
.WindowState = xlMaximized
Zoom = Int(.Width / Me.Width * 100)
Width = .Width
Height = .Height
End With
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.