Sayfa 1 yerine istediğin sayfayı yazıp oraya yönlenmesini isteyebilirsin veya silebilirsin,
Sub Autpen()
Sheets("Sayfa1").Select
Application.Visible = True
UserForm1.Show
End Sub
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.