Birden fazla çalışma kitabından aynı ada sahip çalışma sayfalarını birleştirin

Veri analizinde, özellikle konsolide raporlama veya çeşitli kaynaklardan veri toplama işlemleriyle uğraşırken, birden fazla Excel çalışma kitabındaki verileri tek bir sayfada birleştirmek yaygın bir gerekliliktir. Farklı çalışma kitaplarında aynı ada sahip çalışma sayfalarını birleştirmeniz gerektiğinde bu özellikle zorlayıcı olabilir. Bu öğretici, size bu süreci kolaylaştırmak için iki etkili yöntem sunacak: programlanabilir bir yaklaşımı tercih edenler için VBA kodu kullanma ve daha kullanıcı dostu, otomatikleştirilmiş bir çözüm arayan kullanıcılar için Kutools for Excel'i kullanma.

• Aynı ada sahip çalışma sayfalarını VBA kodu ile birleştirme
• Kutools for Excel ile aynı ada sahip çalışma sayfalarını kolayca birleştirin

Aynı ada sahip çalışma sayfalarını VBA kodu ile birleştirme

Bu bölümde, birden fazla çalışma kitabından aynı ada sahip çalışma sayfalarını birleştirmek için bir VBA kodu bulunmaktadır, lütfen aşağıdaki adımları izleyin:

1. VBA düzenleyicisini açmak için "Alt" + "F11" tuşlarına basın.
2. VBA düzenleyicisinde, "Ekle" > "Modül" seçeneğine tıklayın ve ardından aşağıdaki VBA kodunu modüle girin.
   VBA kodu: Aynı ada sahip çalışma kitaplarını birleştirme

   Sub CombineSameNameSheetsFromMultipleWorkbooks()
   'Updated by Extendoffice 2025/3/27
       Dim wsTarget As Worksheet
       Dim wbTarget As Workbook
       Dim wbSource As Workbook
       Dim wsSource As Worksheet
       Dim strSheetName As String
       Dim fd As FileDialog
       Dim FileChosen As Integer
       Dim FileName As String
       Dim lastRow As Long
   
       ' Set the name of the sheets to combine
       strSheetName = "SheetName" ' Change "SheetName" to the name of your sheet
   
       Set wbTarget = Workbooks.Add
       Set wsTarget = wbTarget.Sheets(1)
       wsTarget.Name = "Combined Data"
   
       Set fd = Application.FileDialog(msoFileDialogFilePicker)
       fd.AllowMultiSelect = True
   
       FileChosen = fd.Show
       If FileChosen = -1 Then
           For Each varFile In fd.SelectedItems
               Set wbSource = Workbooks.Open(varFile)
               
               On Error Resume Next
               Set wsSource = wbSource.Sheets(strSheetName)
               On Error GoTo 0
               
               If Not wsSource Is Nothing Then
                   lastRow = wsTarget.Cells(wsTarget.Rows.Count, 1).End(xlUp).Row
                   
                   wsSource.UsedRange.Copy Destination:=wsTarget.Cells(lastRow + 1, 1)
                   
                   Set wsSource = Nothing
               End If
               wbSource.Close False
           Next varFile
       End If
       MsgBox "Data has been combined successfully!", vbInformation
   End Sub

   Not: Kodu çalıştırmadan önce, birleştirmek istediğiniz sayfaların gerçek adını "strSheetName" değişkenindeki "SheetName" ile değiştirmeniz gerekir.

   

3. Kodu çalıştırmak için "F5" tuşuna basın. Bir "Excel dosyalarını seçin" penceresi açılacak, lütfen birleştirmek istediğiniz aynı ada sahip çalışma sayfalarını içeren çalışma kitaplarını seçin ve ardından "Aç" düğmesine tıklayın.

   

4. Birleştirme işlemi tamamlandığında, çalışma sayfalarının başarıyla birleştirildiğini onaylamak için bir "Microsoft Excel" iletişim kutusu açılacaktır. Onaylamak için "Tamam" düğmesine tıklayın.

   

Şimdi, seçilen çalışma kitaplarındaki tüm aynı ada sahip çalışma sayfalarının içeriği yeni bir çalışma kitabında tek bir çalışma sayfasında birleştirilmiştir.

Kutools for Excel ile aynı ada sahip çalışma sayfalarını kolayca birleştirin

VBA, Excel'de güçlü otomasyon yetenekleri sunsa da, programlama bilgisi olmayan kullanıcılar için karmaşık ve ürkütücü olabilir. Ayrıca, VBA dikkatli güvenlik uygulamaları gerektirir ve uyumluluk sorunlarına neden olabilir. Buna karşılık, "Kutools for Excel", çalışma sayfalarını birden fazla çalışma kitabından birleştirme işlemini basitleştiren, karmaşık kodlamaya gerek bırakmayan ve tüm Excel kullanıcıları için erişilebilir hale getiren daha kullanıcı dostu ve güvenli bir alternatif sunar.

Kutools for Excel'i kurduktan sonra, "Kutools Plus" > "Birleştir" seçeneğini seçerek "Çalışma Sayfalarını Birleştir" sihirbazını açın. Ardından aşağıdaki şekilde yapılandırın.

1. "Çalışma Sayfalarını Birleştir – 3 Adımdan 1. Adım" sihirbazında, "Tüm aynı ada sahip çalışma sayfalarını tek bir çalışma sayfasında birleştir" seçeneğini işaretleyin ve "İleri"ye tıklayın.

   

2. "3 Adımdan 2. Adım" sihirbazında, birleştirmek istediğiniz aynı ada sahip çalışma sayfalarını içeren çalışma kitaplarını seçmek için "Ekle" düğmesine tıklayın.
   Not: Çalışma kitapları bir klasörde kayıtlıysa, "Ekle" düğmesinin yanındaki açılır oku tıklayarak alt menüyü genişletebilir ve ardından o klasörden tüm Excel dosyalarını hızlıca eklemek için "Klasör" seçeneğini seçebilirsiniz.

   

3. Çalışma kitaplarını ekledikten sonra, ihtiyacınıza bağlı olarak iki seçeneğiniz vardır:
   • Seçilen tüm çalışma kitaplarındaki tüm çalışma sayfalarını tek bir çalışma kitabında birleştirmek istiyorsanız, doğrudan "İleri" düğmesine tıklayın. Tüm çalışma sayfaları birleştirilecek ve aynı ada sahip çalışma sayfalarının içeriği tek bir çalışma sayfasında birleştirilecektir.
   • Sadece aynı ada sahip çalışma sayfalarını birleştirmek istiyorsanız, önce "Çalışma Sayfası Listesi" bölümünde bir çalışma sayfası seçin ve ardından "Aynı Sayfa" düğmesine tıklayın. Bu, eklenen tüm çalışma kitaplarındaki aynı ada sahip tüm çalışma sayfalarını otomatik olarak seçecektir. Bundan sonra devam etmek için "İleri"ye tıklayın.

   

4. Sihirbazın son adımında, varsayılan seçeneği koruyabilir veya ihtiyaçlarınıza göre ayarları özelleştirebilir ve ardından "Tamamla"ya tıklayabilirsiniz.

   

5. Birleştirilmiş çalışma kitabı için bir hedef klasör seçin, bir dosya adı girin ve ardından işlemi tamamlamak için "Kaydet" düğmesine tıklayın.

   

Birden fazla çalışma kitabından aynı ada sahip çalışma sayfalarını birleştirmek, doğru araçlarla verimli bir şekilde yapılabilir. Dahili yöntemleri mi yoksa gelişmiş eklentileri mi tercih edersiniz, her iki yaklaşım da farklı beceri seviyelerine uygun güvenilir çözümler sunar. Bu teknikleri öğrenmek, Excel'deki veri birleştirme işlemlerini önemli ölçüde hızlandıracak ve üretkenliğinizi artıracaktır.

Bu özellik hakkında daha fazla bilgi edinmek istiyorsanız, lütfen şu sayfayı ziyaret edin: Birden fazla çalışma kitabından aynı ada sahip çalışma sayfalarını birleştirme eğitimi.

İlgili makaleler:

Excel'de birden fazla çalışma kitabını tek bir çalışma kitabında nasıl birleştirirsiniz?

Çalışma sayfalarını / çalışma kitaplarını tek bir çalışma sayfasında nasıl birleştirirsiniz?

Çalışma sayfalarından / çalışma kitaplarından verileri tek bir çalışma sayfasında nasıl özetlersiniz?