Liste Birleştirme Programı

Liste Birleştirme Programı, açık olan birden fazla Excel dosyasındaki listeleri Ana_Sayfa sayfasında tanımlanan başlıklara göre tek tabloda toplayan makrolu bir şablondur. Aynı başlığı taşıyan sütunların verileri, ana sayfadaki ilgili sütunun altına alt alta aktarılır.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Ana_Sayfa: Başlıkların 4. satıra yazıldığı tek sayfadır. Birleştirilen veriler 5. satırdan itibaren listelenir. Sayfada formül bulunmaz.

Makrolar​

• Listeleri_Birleştir: Ana_Sayfa 4. satırındaki başlıkları okur. Açık olan diğer çalışma kitaplarının her sayfasında bu başlıklarla eşleşen ilk başlık satırını bulur (büyük/küçük harf farkı gözetilmez). Başlığın altındaki verileri son dolu satıra kadar kopyalayıp Ana_Sayfa'da ilgili sütunun ilk boş satırına yapıştırır. İşlem sırasında durum çubuğunda kitap ve sayfa adı görünür. Bitince 4. satırın dolgu rengi yeniden ayarlanır. Makroya Ctrl+q kısayolu atanmıştır.
• Temizle: Ana_Sayfa'da 5. satırdan son kullanılan hücreye kadar olan verileri siler; başlık satırı korunur.
• Birleştirme: Aynı işi farklı bir yöntemle yapan ikinci sürümdür. Başlıkları her sayfada arar, altındaki verileri kopyalar ve Ana_Sayfa'daki sütunun sonuna ekler.
• Autpen: Dosya açıldığında çalışır; içindeki satırlar yorum durumundadır, bir işlem yapmaz.

Kodda dosya silme veya dışarıya bağlantı işlemi yoktur. Makrolar yalnızca açık çalışma kitaplarındaki verileri okur ve bu dosyaya kopyalar. Hata denetimi kapalı (On Error Resume Next) çalıştığı için eşleşmeyen başlıklar sessizce atlanır.

Nasıl kullanılır​

1. Dosyayı açıp makroları etkinleştirin.
2. Ana_Sayfa'nın 4. satırına, birleştirmek istediğiniz listelerdeki başlıkları A sütunundan başlayarak yazın.
3. Birleştirilecek dosyaları Excel'de açın; başlıklar bu dosyalardaki başlıklarla aynı yazılmalıdır.
4. Ana_Sayfa'ya dönüp Ctrl+q ile Listeleri_Birleştir makrosunu çalıştırın (Alt+F8 ile de seçilebilir).
5. Yeni bir birleştirme öncesinde Temizle makrosuyla eski veriler silinir.