Macro Etkin Değilse ?

SerTkaN

Altın Üye
Katılım
27 Kasım 2019
Mesajlar
89
Excel Vers. ve Dili
Microsoft Office 2016
Altın Üyelik Bitiş Tarihi
16-02-2030
Arkadaşlar Merhaba;
Excel çalışmamda açılışta userform ile Kabul ediyorum ve Kabul etmiyorum diyerek excel açılmakta faakat macto etkin değilse direk sayfaya erişilerek işlem yapılabiliyor bunu nasıl engelleyebiliriz? bir kaç şey denedim örneğin UYARI adlı yeni bir sayfa açarak (içinde macro etkinleştirin uyarı metni yazarak) macro etkin değilse buraya yönlendirme gibi ama bunu yaptığımdada bu sayfa adı tanımlı diye uyarı alıyorum.

Bakan inceleyen arkadaşlara teşekkür ederim.
 

Ouzz_z

Altın Üye
Katılım
19 Nisan 2024
Mesajlar
67
Excel Vers. ve Dili
LTSC Pro Plus 2024
Altın Üyelik Bitiş Tarihi
20-04-2026
Boş bir sayfa koyun. Gizlenecek sayfayı da Worksheets("Sayfa1").Visible = xlSheetVeryHidden ile gizleyin, form açılınca Visible yapıp kullanırsınız. Gizli kalırsa hata verebilir.
 

volki_112

Altın Üye
Katılım
29 Eylül 2023
Mesajlar
770
Excel Vers. ve Dili
2019 Türkçe
Altın Üyelik Bitiş Tarihi
13-12-2029
Arkadaşlar Merhaba;
Excel çalışmamda açılışta userform ile Kabul ediyorum ve Kabul etmiyorum diyerek excel açılmakta faakat macto etkin değilse direk sayfaya erişilerek işlem yapılabiliyor bunu nasıl engelleyebiliriz? bir kaç şey denedim örneğin UYARI adlı yeni bir sayfa açarak (içinde macro etkinleştirin uyarı metni yazarak) macro etkin değilse buraya yönlendirme gibi ama bunu yaptığımdada bu sayfa adı tanımlı diye uyarı alıyorum.

Bakan inceleyen arkadaşlara teşekkür ederim.
  • Yeni bir sayfa oluşturun:
    • Bu sayfanın adı önemli değil, örnek olarak Sayfa1 kullanabilirsiniz.
  • Excel kapanırken diğer sayfaları gizleme:
    • Sayfa1 hariç tüm diğer sayfaları gizleyin.
    • Bu işlemi Workbook_BeforeClose olayına bağlayabilirsiniz.
    • Böylece Excel kapandığında, Sayfa1 hariç tüm sayfalar gizli olur.
  • Excel açıldığında tüm sayfaları görünür yapma:
    • Auto_Open veya Workbook_Open makrosu ile tüm sayfaları görünür yapın.
    • Eğer makro etkinse, açılışta tüm sayfalar görünür olur.
    • Makro etkin değilse, Sayfa1 hariç diğer sayfalar gizli olduğu için sadece Sayfa1 gözükür.
  • Sayfa1’de kullanıcıya bilgi verme:
    • Sayfa1 üzerine büyük ve görünür bir şekilde:
      “Excel’i kullanmak için lütfen makroları etkinleştirin”
      yazısı ekleyin.
  • VBA’da sayfa referansı:
    • Sayfaları VBA’da kodlarken, sayfa adını değil VBA’daki codename’i kullanın.
    • Böylece kullanıcı sayfa adını değiştirirse makro hâlâ doğru çalışır.
 

SerTkaN

Altın Üye
Katılım
27 Kasım 2019
Mesajlar
89
Excel Vers. ve Dili
Microsoft Office 2016
Altın Üyelik Bitiş Tarihi
16-02-2030
@Ouzz_z ve @volki_112 üstadlara teşekkür ederim, herşeyi denedim ama tam istediğimi hala yapamadım, cevaplarınız için teşekkür ederim.
 

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
6,615
Excel Vers. ve Dili
2019 Türkçe
Merhaba.

BuÇalışmaKitabı adlı kod sayfasındaki kodları inceleyin.

Dosyada Sayfa1 görünür diğer sayfalar gizlidir.
Eğer dosya açıldığında makrolar çalışmıyorsa Sayfa1 görünür kalır diğerleri gizli olduğu için kullanıcı o sayfalara ulaşamaz.

Eğer dosya açıldığında makrolar çalışıyorsa Sayfa1'i gizler diğer sayfaları görünür yapar.
Dosya kapatıldığında Sayfa1'i tekrar görünür yapar diğerlerini gizler. (Yani ilk haline geri çevirir)
 

Ekli dosyalar

SerTkaN

Altın Üye
Katılım
27 Kasım 2019
Mesajlar
89
Excel Vers. ve Dili
Microsoft Office 2016
Altın Üyelik Bitiş Tarihi
16-02-2030
@Muzaffer Ali Hocam Teşekkür ederim, dosyamda userform ve şifreli koruma mevcut bu yüzden takılma yaşıyorum tekrar deneyeceğim.
 
Üst