Bir Çalışma Kitabında Kaç Sayfa Var

Bir Çalışma Kitabında Kaç Sayfa Var isimli VBA kodunu kullanarak, bir Excel dosyasının kaç sayfa içerdiğini kolayca bulma işlemini gerçekleştirebilirsiniz.

XD Destek İste
Sub KacSayfa()
    MsgBox ThisWorkbook.Name & " isimli dosyada toplam " & ThisWorkbook.Worksheets.Count & " sayfa var"
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. Araç çubuklarından Insert -> Module yazısına tıklayın.
  4. Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
  5. Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
  6. Üstteki kodu yapıştırın.
#Bir Çalışma Kitabında Kaç Sayfa Var
50 Farklı Hazır Makro (VBA) Kodu
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Açılışta Üç Kere Şifre Hakkı Vermek
Excel Makroları ile Dosya Sayısını Bulma
Bir Aralıktaki Minimum Değeri Renklendirme
Excel ile Demo Yapma Makrosu
Otomatik Sıra Numarası Ekleme
Dizileri Döngüye Eklemek
Son Dolu Satırın Bir Altına Yazdırma
Excel Makroları ile Form Çağırma
Excel Açılırken Otomatik İşlem Yaptırma
Excel Makroları ile İşlemci Bilgilerini Bulma
Makro ile Hızlı Doldurma
Excel Makro Modulü Silme Kodu
Tüm Sütunda İşlem Yapan Döngü
Listbox ve Combobox Satır Kaydırma
Yazı Efekti Verme Kodu
Makrolar ile Eliptik Form Oluşturma
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Sütunu Kes Kopyala ve Yapıştır
Satır Yüksekliğini Ayarla
Excel Kitabındaki Sayfa Adlarının Listelenmesi
Excel Kapanırken Otomatik İşlem Yaptırma
Son Satır Numarasını Bulma
Hücrenin Arka Plan Rengini Değiştirme
56 Renk Kodunu Sıralama
Yanıp Sönme Efekti Verme Kodu
Checkbox ile Exceli Kapatıp Açmak
Tek Hücreyi Kes Kopyala ve Yapıştır
Tekrarlayan Verileri Vurgulama
Excel Menüsüne Ekleme Yapma Kodu
Excel Makroları ile Hücreye Saat Ekleme
Sütunda Yazılı Olanlardan Sayfa Adı Yapma
Son Sütun Numarasını Bulma
Hücrede Değişiklik Olduğunda Makroyu Çalıştırma
Gizli Sayfaların Bulunması ve Gösterilmesi
Hesap Makinesini Açma
Label Nesnesine Kayan Yazı Ekleme
Aktif Satırı ve Sütunu Vurgulama
Excel Hücresine Gitme Makrosu
Excel Dosya Silme İşlemi Makrosu
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
UserForm Üzerinde Dört İşlem
Excel Makroları ile Dosya Taşıma
Makro ile Boş Satırları Silme
Seçili Sütunların Sayısını Bulma
Hücre Aralığını Kes Kopyala ve Yapıştır
Hücrenin Rengini Değiştirme
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
Excel Dosya Arama Yapma Makrosu
Sayıları Rastgele Karıştırmak
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum

Daha önce yorum yapılmamış!

Hücrelerimize bir rakam yazdıktan sonra, bu rakamdan sonra gelecek rakamları aşağı ya da yana doğru otomatik çoğaltmak için, Doldurma Seçeneklerini kullanabiliriz.

Örneğin, herhangi bir hücreye 1 yazıp, fareyi hücrenin sağ alt köşesine getirip, sağ tık ile sağa ya da aşağı doğru sürükledikten sonra karşımıza çıkan menüden Doldurma Serisini seçmemiz halinde, diğer sayıların otomatik olarak arttırılarak yazıldığını göreceksiniz.

ipucu19
Yükleniyor...