Makro Etkinleştirilmeden Sayfalar Görüntülenmesin

21 Nisan 2021 25 Nisan 2021 731

Makro Etkinleştirilmeden Sayfalar Görüntülenmesin kodu, kullanıcıları makroları etkinleştirmeye zorlamak için yazılmış örnek bir kod içermektedir.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Sayfa1").Visible = True

For Each Worksheet In ActiveWorkbook.Worksheets
    If Worksheet.Name <> "Sayfa1" Then
        Worksheet.Visible = False
    End If
Next

ActiveWorkbook.Protect Password:="sifre", Structure:=True, Windows:=True
End Sub

Private Sub Workbook_Open()
ActiveWorkbook.Unprotect Password:="sifre"
ActiveWorkbook.Unprotect

For Each Worksheet In ActiveWorkbook.Worksheets
    Worksheet.Visible = True
Next

Sheets("Sayfa1").Visible = False
End Sub

Gerekli Adımlar

Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
  3. Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
  4. Üstteki kodu yapıştırın.

Kod Açıklaması

Excel dosyalarınızı açtığınızda mutlaka makroların etkinleştirilmesini istiyorsanız, bu kodlar tam sizin işinize yarayacak niteliktedir.
Kodların çalışma mantığı şu şekildedir:

  • Dosya kapatılırken sadece Sayfa1 isimli sayfa açık bırakılır ve diğer tüm sayfalar gizlenir.
  • Açılışta makrolar etkinleştirilmişse, bu sefer Sayfa1 isimli kod gizlenir, diğer tüm sayfalar aktif edilir.
Sayfa1 isimli sayfayada "Dosyamızı kullanabilmek için Makroları Etkinleştirmeniz gerekir" tarzında bir uyarı mesajı koyup, kodları şifrelediğinizde; kullanıcılar mecburen makroların etkinleştirilmesine yönelik davranış içerisine girecektir. Özellikle makrolardan bihaber Excel kullanıcıları ile paylaşılan dosyalarda bu yöntemi kullanmak oldukça faydalı olacaktır.

Hazır Dosyayı İndir

Dosyayı indirmek için giriş yapmanız ve VIP Üyelik Paketine sahip olmanız gerekir.
50 Farklı Hazır Makro (VBA) Kodu
TextBox Nesnesinde Kuruş Göstermek
Tüm Satırda İşlem Yapan Döngü
Makro Çalışırken İmlecin Hareket Etmemesini Sağlama
Kare Kökünü Hesaplama
Satır Yüksekliğini Ayarla
Yorumları Yazdırma
Excel Makroları ile İşlemci Bilgilerini Bulma
56 Renk Kodunu Sıralama
Kilitlenmemiş Hücreleri Seçme İşlemi
Dolar Okutma Makrosu
Dizileri İç İçe Döngüye Eklemek
Excel Üzerinden Klasör Alma Kodu
Makro ile Git Penceresini Açma
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Makrolar ile Sonraki Sayfaya Geçmek
Makro Etkinletirilmezse Sayfalar Gizlenir
Aktif Satırı ve Sütunu Vurgulama
Aktif Hücrenin Sütun Numarasını Bulma
Makrolar ile Klasör Silme
Tüm Çalışma Sayfalarını Tek Adımda Koruma
Excel Açılırken Otomatik İşlem Yaptırma
Excel Şerit Menü Çubuğunu Gizleme
UserForm Açılırken Efekt Ekleme
Makro ile Hızlı Doldurma
Aktif Çalışma Sayfası Dışında Tümünü Silme
Sürücü Seri Numarasını Gösterme
Adlandırılmış Aralıkları Vurgulama
Formül Bulunan Hücreleri Koruma ve Kilitleme
Metnin İçinden TC Kimlik Numarasını Ayırma
Excel Makroları ile Hücreye Saat Ekleme
Zaman Aralığı Ekleme
Excel Kapanırken Otomatik İşlem Yaptırma
2. Derece Denklemin Grafiğini Çizmek
Sayıyı Çift ya da Çiftin Katı Yapma
ComboBox Nesneleri ile Toplama Yapma
Alarmlı Saat Ekleme Kodu
Excel Menüsüne Ekleme Yapma Kodu
Tam Dizin İsmini Bulma
Makro ile Açılan Liste Oluşturma
Excel Hücrelerini Çözme
Excel Makroları ile Klasör Silme
Kaydedilmemiş Açık Çalışma Kitaplarını Sayma
Bir Aralıktaki Minimum Değeri Renklendirme
Tarih ve Saatten Saati Kaldırma
Otomatik Sıra Numarası Ekleme
Excel Makro ile Hücreye Veri Yazma
Program Başlangıcı Kodları
Aktif Çalışma Sayfasını Koruma
Excel Seçenekleri Penceresini Açma
Excel Sayfalarındaki Resimleri Silmek

Daha önce yorum yapılmamış!

Backlink Reklam Bu alanda 50 karakterlik açıklama ile web sitenize ait Backlink Reklam yayınlayabilirsiniz.
Yükleniyor...