Excel'de birden fazla sayfadan aynı hücrelerden bir liste nasıl oluşturulur?

Aşağıdaki VBA koduyla, belirli hücrelerden birden fazla çalışma sayfası arasında kolayca bir liste oluşturabilirsiniz. Aşağıdakileri yapabilirsiniz:

Adım 1: Listeyi oluşturacağınız belirli hücreyi seçin. Bizim durumumuzda, Hücre E6'yı seçiyoruz.

Adım 2: Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına aynı anda basın, Ekle > Modül'e tıklayın ve ardından aşağıdaki kodu modül penceresine yapıştırın.

VBA: Birden fazla sayfadan aynı hücrelerden bir liste oluşturma

Sub CreateList()
Dim xAddWs As Worksheet
Dim xWs As Worksheet
Dim RngAddress As String
xTitleId = "KutoolsforExcel"
RngAddress = Application.ActiveCell.Address
Set xAddWs = Application.ActiveWorkbook.Sheets.Add
xAddWs.Name = xTitleId
i = 1
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xTitleId Then
xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value
i = i + 1
End If
Next
End Sub

Adım 3: Bu VBA'yı çalıştırmak için F5 tuşuna basın veya Çalıştır düğmesine tıklayın.

Ardından, tüm çalışma sayfalarındaki belirtilen hücredeki tüm değerler, KutoolsforExcel adlı yeni bir çalışma sayfasına kopyalanır. Ekran görüntüsüne bakın:

Bu VBA, listeyi yeni bir çalışma sayfasına dolduracak ve listedeki değerler orijinal değerlere göre değişmeyecek şekilde statik olacaktır.

Ancak bazen listeyi belirli bir aralığa doldurmanız gerekebilir ve liste değerlerinin her zaman belirli hücrelerdeki orijinal değerlerle eşleşmesini isteyebilirsiniz. Bu ihtiyaçları karşılamak için aşağıdaki yöntemi denemelisiniz.

Bu yöntem, Kutools for Excel'in Çalışma Sayfalarına Dinamik Referanslar yardımcı programını tanıtmaktadır ve bu da birden fazla çalışma sayfasındaki aynı hücrelerden dinamik bir liste oluşturmanıza olanak sağlar.

Adım 1: Dinamik listenin doldurulacağı Aralığı seçin ve Kutools > Daha Fazla > Çalışma Sayfalarına Dinamik Referanslar'a tıklayın.

Adım 2: Açılan Çalışma Sayfası Referanslarını Doldur iletişim kutusunda,

(1) Doldurma Sırası kutusuna tıklayın ve açılır listeden bir doldurma türü seçin. Bizim durumumuzda, Dikey hizalamayı hücreye göre doldur'u seçiyoruz;

(2) Doldurma Formülü kutusunda, dinamik bir liste oluşturacağınız hücre adresini belirtin ve ardından Kilitle düğmesine tıklayın formülü kilitlemek için.

(3) Doldurma Aralığı düğmesine tıklayın.

Şimdi aşağıda gösterilen ekran görüntüsünde olduğu gibi, tüm çalışma sayfalarındaki belirtilen hücrelerdeki değerlerin belirlenen aralığa doldurulduğunu göreceksiniz:

Orijinal değerler değiştiğinde, bu belirlenen listedeki karşılık gelen değerler otomatik olarak değişecektir.

Excel'de farklı sayfalardan aynı hücreyi bir sayfaya nasıl otomatik doldurabilirsiniz?