Excel sayfalarını tek dosyada birleştirme ve verileri çalışma kitapları arasında taşıma

Birden fazla Excel sayfasını tek bir çalışma kitabında birleştirmek veya bir sayfayı başka bir dosyaya taşımak için, yapıyı ve formülleri korumak amacıyla yerleşik "Taşı veya Kopyala" işlevini kullanın ya da farklı kaynaklardan gelen verileri tek bir tabloda otomatik olarak toplamak için Power Query aracından yararlanın. Yöntem seçimi, sayfaları ayrı sekmeler olarak mı korumanız yoksa içeriklerini tek bir bitişik liste halinde mi birleştirmeniz gerektiğine bağlıdır.

Tüm bir sayfayı başka bir çalışma kitabına taşıma

Bu yöntem, karmaşık biçimlendirme ve formüllere sahip hazır bir raporu, gösterge panelini veya tabloyu, sayfa içindeki bağlantıları kaybetmeden başka bir dosyaya taşımak istediğinizde idealdir.

Yöntem 1: Bağlam menüsü aracılığıyla (Önerilen)

Bu yöntem, sütun genişliklerinin, koşullu biçimlendirmenin ve yazdırma ayarlarının korunmasını garanti eder.

1. Her iki Excel dosyasını da açın (kaynak ve hedef).
2. Kaynak dosyada, sayfa sekmesine (ekranın alt kısmında) fareyle sağ tıklayın.
3. "Taşı veya Kopyala..." seçeneğini belirleyin.
4. "Kitaba:" açılır listesinden hedef dosyanın adını seçin.
   • Dosya listede yoksa, açık olduğundan emin olun.
5. "Şu sayfanın önüne:" alanında sayfayı nereye eklemek istediğinizi belirtin.
6. Önemli: Sayfayı eski dosyada bırakmak istiyorsanız "Kopya oluştur" kutusunu işaretleyin. Kutuyu işaretlemezseniz, sayfa kesilip taşınır.
7. Tamam düğmesine tıklayın.

Yöntem 2: Sürükle ve bırak (Drag-and-Drop)

Tek monitörde hızlı çalışmak için uygundur.

1. İki çalışma kitabının pencerelerini yan yana yerleştirin ("Görünüm" sekmesi → "Yan Yana").
2. Klavyedeki Ctrl tuşuna basılı tutun (bu bir kopya oluşturur; Ctrl olmadan sayfa taşınır).
3. Fare sol düğmesini sayfa sekmesine basılı tutarak hedef çalışma kitabının sekmesine sürükleyin.
4. Fare düğmesini, ardından Ctrl tuşunu bırakın.

Birden fazla sayfadaki verileri tek bir tabloda birleştirme

Amacınız, özet tablo veya analiz için farklı aylardan veya departmanlardan gelen verileri tek bir bitişik listede toplamaksa, basit kopyalama işlemi zahmetli olabilir.

Yöntem 1: Manuel kopyalama (Tek seferlik görevler için)

Sayfa sayısı azsa (2–5) ve veri yapısı aynıysa uygundur.

1. "Toplam" adında yeni bir sayfa oluşturun.
2. İlk kaynaktaki tablo başlıklarını kopyalayın.
3. İlk sayfadaki verileri (başlıklar hariç) seçin, Ctrl+C tuşlarına basın.
4. "Toplam" sayfasında verileri yapıştırın (Ctrl+V).
5. Diğer sayfalar için tekrarlayın ve verileri önceki bloğun hemen altına yapıştırın.
6. Kayıtların tekrarlanma riski varsa "Yinelenenleri Kaldır" komutunu ("Veri" sekmesi) kullanın.

Yöntem 2: Power Query (Düzenli raporlama için)

En güvenilir yöntemdir. Kaynak dosyalara yeni veriler eklendiğinde, sonuç tablosu tek bir düğmeyle güncellenir.

1. "Veri" sekmesine gidin → "Veri Al" → "Diğer Kaynaklardan" → "Boş Sorgu".
2. Power Query düzenleyicisinde "Giriş" → "Veri Gir" seçeneğini belirleyin (veriler tek bir çalışma kitabındaysa) veya harici dosyaları içe aktarmak için "Veri Al" → "Dosyadan" → "Çalışma Kitabından" yolunu kullanın.
   • Aynı çalışma kitabındaki sayfalar için alternatif: Formül çubuğunda =Excel.CurrentWorkbook() formülünü kullanın (adlandırılmış aralıklar veya tablolar önceden oluşturulmalıdır).
3. Yeni başlayanlar için en kolayı: Her kaynak sayfayı **"Akıllı Tablo"**ya dönüştürün (Ctrl+T) ve onlara isim verin (Tablo1, Tablo2).
4. Power Query'de "Sorguları Birleştir" → "Ekle" (Append) seçeneğini belirleyin.
5. Alt alta eklemek istediğiniz tabloları seçin.
6. "Kapat ve Yükle" düğmesine tıklayın. Veriler, bağlantılı bir tablo olarak yeni bir sayfada görünecektir.

Yöntem 3: VBA ile otomasyon (İleri düzey kullanıcılar için)

Onlarca sayfayı düzenli olarak birleştirmeniz gerekiyorsa, makro zaman kazandırır.

1. VBA düzenleyicisini açmak için Alt + F11 tuşlarına basın.
2. Yeni bir modül ekleyin (Insert → Module) ve aşağıdaki kodu yapıştırın:

Sub MergeSheetsIntoOne()
    Dim ws As Worksheet
    Dim masterWs As Worksheet
    Dim rng As Range
    Dim lastRow As Long
    
    ' Sonuçlar için yeni bir sayfa oluştur
    Set masterWs = ThisWorkbook.Sheets.Add(After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))
    masterWs.Name = "Genel_Rapor"
    
    ' İlk sayfadan başlıkları kopyala (yapının aynı olduğunu varsayıyoruz)
    ThisWorkbook.Sheets(1).Rows(1).Copy Destination:=masterWs.Rows(1)
    
    lastRow = 1
    
    For Each ws In ThisWorkbook.Worksheets
        If ws.Name <> masterWs.Name Then
            ' Kaynak sayfadaki son dolu satırı belirle
            Set rng = ws.UsedRange
            If rng.Rows.Count > 1 Then
                ' Başlık olmadan verileri kopyala (2. satırdan başlayarak)
                ws.Range("A2", ws.Cells(ws.Rows.Count, 1).End(xlUp).End(xlToRight)).Copy _
                    Destination:=masterWs.Cells(lastRow + 1, 1)
                
                ' Satır sayacını güncelle
                lastRow = masterWs.Cells(masterWs.Rows.Count, 1).End(xlUp).Row
            End If
        End If
    Next ws
    
    MsgBox "Birleştirme tamamlandı!", vbInformation
End Sub

3. Makroyu çalıştırın (F5). Tüm sayfalardaki (sonuç sayfası hariç) veriler tek bir listede toplanacaktır.

Sık yapılan hatalar ve çözümler

Sıkça Sorulan Sorular (SSS)

Kapalı dosyalardaki sayfaları birleştirebilir miyim? Evet, ancak yalnızca Power Query veya özel eklentiler kullanarak. Standart kopyalama her iki dosyanın da açık olmasını gerektirir. Power Query'de diskteki dosyalara yolu belirtin; dosyalar kapalı olsa bile veriler yüklenecektir.

Farklı sayfalardaki sütun yapısı farklıysa ne yapmalıyım? Power Query'de "Ekle" (Append) yöntemini kullanırken sütunlar isimlerine göre eşleştirilir. Sütun adı farklıysa, veriler boş hücrelere gider. Birleştirmeden önce başlıkları tek bir biçime getirin. Manuel kopyalamada yapıyı elle hizalamanız gerekir.

Birleştirmeden önce çok sayıda sayfayı hızlıca nasıl yeniden adlandırabilirim? Tüm sayfa sekmelerini seçin (Shift veya Ctrl tuşuna basılı tutarak), fareyle sağ tıklayın → "Sekmeleri Renklendir" (görsel gruplama için). Toplu yeniden adlandırma için en uygun yol basit bir VBA makrosu kullanmaktır, çünkü standart araçlarla bu işlem yalnızca tek tek yapılabilir.