Excel'de Köprülerle Hızlıca Özet Çalışma Sayfası Oluşturun

İçindekiler

Birçok meslektaşım zamanlarının çoğunu Excel'de Özet Çalışma Sayfası oluşturmaya harcıyor.

Tipik bir özet çalışma sayfası, farklı hücrelerdeki tüm çalışma sayfalarının adlarına sahiptir ve tüm adlar da bu çalışma sayfalarına köprü bağlantılıdır.

Böylece sayfa adına sahip bir hücreye tıklayabilirsiniz (Ocak, Şubat, Mart deyin… ) ve sizi o çalışma sayfasına götürecektir. Ayrıca, her çalışma sayfasında özet çalışma sayfasına geri bağlanan bir köprü de vardır.

Meslektaşlarım bunu yapmakta süper verimli hale gelse de, aynı şeyi bir saniyeden daha kısa sürede yapabilmeniz hala zaman kaybı (evet, doğru okudunuz).

İşin püf noktası, bunu sizin için yapacak kısa bir makro oluşturmaktır.

Kaç tane çalışma sayfanız olursa olsun, çalışan köprülerle anında bir özet çalışma sayfası oluşturacaktır.

Aşağıda gösterildiği gibi bir şey:

Yukarıdaki resimde gördüğünüz gibi makroyu çalıştırdığınızda (düğmesine tıklayarak) anında özet oluşturuyor. Sayfa adları, üzerine tıkladığınızda sizi çalışma sayfasına götüren köprüdür.

Köprülerle Özet Çalışma Sayfası Oluşturun

Özet çalışma sayfasının oluşturulmasındaki tüm ağır işler kısa bir VBA koduyla yapılır. Sadece kodu çalıştırmanız ve biraz ara vermeniz gerekiyor, çünkü şimdi biraz boş zamanınız olacak 🙂

İşte kod:

Sub CreateSummary() 'Trumpexcel.com'un Sumit Bansal tarafından oluşturuldu ' Bu kod, köprülerle özet çalışma sayfası oluşturmak için kullanılabilir Dim x Çalışma Sayfası Olarak Dim Counter As Integer Counter = 0 Çalışma Sayfalarında Her x İçin Sayaç = Sayaç + 1 Sayaç = 1 ise Ardından ActiveCell .Value = x.Name .Hyperlinks.Add ActiveCell, "", x.Name & "!A1", TextToDisplay:=x.Name, ScreenTip:="Çalışma Sayfasına gitmek için burayı tıklayın" Çalışma Sayfaları ile Donothing'e gidin (Sayaç) .Range("A1").Value = "Geri " & ActiveSheet.Name .Hyperlinks.Add Sheets(x.Name).Range("A1"), "", _ "'" & ActiveSheet.Name & "'" & "!" & ActiveCell.Address, _ ScreenTip:="Geri Dön " & ActiveSheet.Name End With ActiveCell.Offset(1, 0).Yapma: Sonraki x End Sub 
Bu Kodu Nereye Koymalı?

Bu kodu çalışma kitabına yerleştirmek için aşağıdaki adımları izleyin:

  1. Geliştirici Sekmesine gidin ve Visual Basic'e tıklayın. Klavye kısayolunu da kullanabilirsiniz - ALT F11.
    • Geliştirici sekmesini Excel'deki şeritte bulabilirseniz, nasıl edineceğinizi öğrenmek için burayı tıklayın.
  2. Solda bir Proje Gezgini bölmesi olmalıdır (eğer orada değilse, görünür hale getirmek için Control + R tuşlarını kullanın).
  3. Ekle'ye gidin ve Modülde Tıklayın. Bu, çalışma kitabına bir modül ekler. Ayrıca, sağda kod penceresinin (yanıp sönen bir imleç ile) göründüğünü görürsünüz.
  4. Modül kodu penceresinde yukarıdaki kodu kopyalayıp yapıştırın.
Kodu Çalıştırmak

Bu kodu çalıştırmak için:

  • Geliştirici Sekmesi -> Kod -> Makrolar'a gidin. Bu, Makro Diyalog kutusunu açacaktır.
  • Macro CreateSummary'i seçin ve Çalıştır'a tıklayın.
  • Bu, makroyu çalıştıracak ve etkin sayfada köprüleri oluşturacaktır.

Makroyu çalıştırmanın başka bir yolu da bir düğme/şekil eklemek ve makroyu ona atamaktır. Bunu yapmak için:

  • Çalışma sayfasına bir şekil ekleyin. Şekli istediğiniz gibi biçimlendirin.
  • Üzerine sağ tıklayın ve Makro Ata'yı seçin.
  • Makro Ata kutusunda, şekle atamak istediğiniz makroyu seçin ve Tamam'a tıklayın.

Şimdi, makroyu çalıştırmak için şekle tıklamanız yeterlidir.

Dosyayı buradan indirin

Not:

  1. Her sayfada, sizi özet sayfasına geri götürmek için hiper bağlantılı olan A1 hücresini sabit kodladım. Her sayfada A1 hücresinde zaten bir şey varsa, buna göre değiştirdiğinizden emin olun.
  2. Özet, kendisi için bir köprü oluşturmaz (bu, zaten o sayfada olduğunuz için mantıklıdır).
  3. Özet Çalışma Sayfası etkin çalışma sayfası olduğunda bu kodu çalıştırın.
  4. Bazı biçimlendirme veya yeniden düzenleme eklemek isteyebilirsiniz. Ama umarım bu kod zor kısmı halleder.
  5. Bir makro içerdiğinden bu çalışma kitabını .xls veya .xlsm uzantısı olarak kaydedin.

Diğer Excel VBA eğitimleri:

  • Tek Bir Hücrede Tekrarlamadan Birden Çok Arama Değeri Alın.
  • Görev Önceliklendirme Matrisi - VBA Uygulaması.
  • Birden Çok Çalışma Kitabını Bir Excel Çalışma Kitabında Birleştirme.
  • Excel VBA Döngüleri - Sonraki İçin, Yaparken, Yapana Kadar, Her Biri İçin (Örneklerle).
  • Bir Makro Nasıl Kaydedilir - Adım Adım Kılavuz.
  • Excel'deki Bir Çalışma Sayfasından Köprüleri Hızlı Bir Şekilde Kaldırma.
  • Çevrimiçi Excel VBA Kursu.
wave wave wave wave wave