Excel'de 3 veya daha fazla sütunun tüm kombinasyonlarını nasıl oluşturabiliriz?
Diyelim ki elinizde 3 sütun veri var ve bu 3 sütundaki verilerin tüm kombinasyonlarını aşağıdaki ekran görüntüsünde gösterildiği gibi oluşturmak ya da listelemek istiyorsunuz. Bu görevi Excel'de çözmek için iyi bir yönteminiz var mı?
Formül kullanarak 3 sütun veriye dayalı olarak tüm kombinasyonları oluşturun
VBA kodu kullanarak 3 veya daha fazla sütun veriye dayalı olarak tüm kombinasyonları oluşturun
Formül kullanarak 3 sütun veriye dayalı olarak tüm kombinasyonları oluşturun
Aşağıdaki uzun formül, 3 sütunun tüm kombinasyonlarını listelemek için yardımcı olabilir, lütfen şu adımları izleyin:
1. Sonucu çıkarmak istediğiniz bir hücreye tıklayın ve ardından aşağıdaki formülü kopyalayıp içine yapıştırın:
Not: Bu formülde: A2:A4, B2:B6, C2:C5 kullanmak istediğiniz veri aralıklarıdır.
2. Ardından, boş hücreler görülene kadar dolgu tutamağını hücrelere doğru aşağı çekin, bu, 3 sütunun tüm kombinasyonlarının listelendiği anlamına gelir, aşağıdaki ekran görüntüsüne bakın:
VBA kodu kullanarak 3 veya daha fazla sütun veriye dayalı olarak tüm kombinasyonları oluşturun
Yukarıdaki uzun formül biraz zor kullanılabilir, eğer birden fazla sütun verisi kullanılıyorsa, değiştirme işlemi zahmetli olabilir. Burada, bunu hızlıca ele almak için size bir VBA kodu tanıtacağım.
1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basın.
2. Ekle Insert > Module'e tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.
VBA kodu: 3 veya daha fazla sütunun tüm kombinasyonlarını oluşturun
Sub ListAllCombinations()
'Updateby Extendoffice
Dim xDRg1, xDRg2, xDRg3 As Range
Dim xRg As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3 As Integer
Dim xSV1, xSV2, xSV3 As String
Set xDRg1 = Range("A2:A4") 'First column data
Set xDRg2 = Range("B2:B6") 'Second column data
Set xDRg3 = Range("C2:C5") 'Third column data
xStr = "-" 'Separator
Set xRg = Range("E2") 'Output cell
For xFN1 = 1 To xDRg1.Count
xSV1 = xDRg1.Item(xFN1).Text
For xFN2 = 1 To xDRg2.Count
xSV2 = xDRg2.Item(xFN2).Text
For xFN3 = 1 To xDRg3.Count
xSV3 = xDRg3.Item(xFN3).Text
xRg.Value = xSV1 & xStr & xSV2 & xStr & xSV3
Set xRg = xRg.Offset(1, 0)
Next
Next
Next
End Sub
Not: Yukarıdaki kodda, A2:A4, B2:B6, C2:C5 kullanmak istediğiniz veri aralığıdır, E2 sonuçları yerleştirmek istediğiniz çıktı hücresidir. Eğer daha fazla sütunun tüm kombinasyonlarını elde etmek istiyorsanız, lütfen kodu gerektiği gibi değiştirin ve diğer parametreleri ekleyin.
3. Ardından, bu kodu çalıştırmak için F5 tuşuna basın ve 3 veya daha fazla sütunun tüm kombinasyonları bir anda oluşturulacaktır, aşağıdaki ekran görüntüsüne bakın:
Harika bir özellik kullanarak 3 veya daha fazla sütun veriye dayalı olarak tüm kombinasyonları oluşturun
Eğer Kutools for Excel'iniz varsa, güçlü Tüm Kombinasyonları Listele özelliği ile birden fazla sütunun tüm kombinasyonlarını hızlı ve kolay bir şekilde listeleyebilirsiniz.
1. Kutools > Ekle > Tüm Kombinasyonları Listele'ye tıklayın, aşağıdaki ekran görüntüsüne bakın:
2. Tüm Kombinasyonları Listele iletişim kutusunda, aşağıdaki ekran görüntüsünde gösterildiği gibi kombinasyonları listelemek için sütun verilerini ve ayırıcıları belirtin:
3. Veri ve ayırıcıyı ayarladıktan sonra, Tamam düğmesine tıklayın, bir sonraki açılır kutuda sonuçları yerleştirecek bir hücre seçin, aşağıdaki ekran görüntüsüne bakın:
4. Ve ardından, Tamam düğmesine tıklayın, tüm kombinasyonlar aşağıdaki ekran görüntüsünde gösterildiği gibi hemen oluşturulacaktır:
Kutools for Excel - Excel'i 300'den fazla temel araçla güçlendirin. Sürekli ücretsiz AI özelliklerinden yararlanın! Hemen Edinin
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar. En çok ihtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
- Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!