Bir sütundaki hücre değerine göre satırları nasıl çoğaltabilirsiniz?

Excel veri tablolarıyla çalışırken, bazen belirli bir sütundaki değere göre tüm satırları çoğaltmanız gerekebilir. Örneğin, D sütunundaki bir sayıya göre her satırı, ilgili hücredeki değerin belirttiği kadar kopyalamak veya eklemek istediğinizi düşünün. Bu, veri genişletme, test için veri setleri hazırlama, stok simülasyonu veya tekrarlanan sipariş satırları oluşturma gibi durumlarda faydalıdır. Bu işlemi manuel olarak yapmadan verimli bir şekilde gerçekleştirmek, veri bütünlüğünü korur ve özellikle büyük tablolar için iş akışını önemli ölçüde hızlandırır.

Hücre değerlerine göre satırları VBA kodu ile birden çok kez çoğaltın

Belirtilen sayıda kez satır kopyalayıp eklemek için kullanışlı bir araç - Kutools for Excel

Power Query dönüşümü ile satırları çoğaltma

Hücre değerlerine göre satırları VBA kodu ile birden çok kez çoğaltın

Örneğin, belirli bir sütundaki değerlere (örneğin D sütununda) göre hızlıca tüm satırları çoğaltmanız gerekiyorsa, VBA doğrudan ve etkili bir çözüm sunar. Büyük veri setleriyle uğraşırken bu yaklaşım özellikle değerlidir çünkü süreci otomatikleştirir ve doğruluğu garanti altına alır. Ancak, VBA ile çalışmak Excel Geliştirici sekmesi ve makroların nasıl yürütüleceğine dair temel bir anlayış gerektirir. Ana avantaj esnekliktir - kod farklı aralıklara veya hedef sütunlara uyacak şekilde ayarlanabilir. Diğer yandan, VBA ile rahat hissetmiyorsanız veya güvenlik politikaları ortamınızda makroları engelliyorsa, lütfen aşağıdaki alternatif çözümlerden birini göz önünde bulundurun.

1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basılı tutun.

2. Ekle Insert > Modül'e tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.

VBA Kodu: Hücre değerine göre satırları birden çok kez çoğalt:

Sub CopyData()
'Updateby Extendoffice
    Dim xRow As Long
    Dim VInSertNum As Variant
    xRow = 1
    Application.ScreenUpdating = False
    Do While (Cells(xRow, "A") <> "")
        VInSertNum = Cells(xRow, "D")
        If ((VInSertNum > 1) And IsNumeric(VInSertNum)) Then
           Range(Cells(xRow, "A"), Cells(xRow, "D")).Copy
           Range(Cells(xRow + 1, "A"), Cells(xRow + VInSertNum - 1, "D")).Select
           Selection.Insert Shift:=xlDown
           xRow = xRow + VInSertNum - 1
        End If
        xRow = xRow + 1
    Loop
    Application.ScreenUpdating = False
End Sub

3. Ardından bu kodu çalıştırmak için F5 tuşuna basın. Tüm satırlar D sütunundaki hücre değerine göre birden çok kez çoğaltılacaktır, gereksinimlerinizi karşılayacak şekilde.

Belirtilen sayıda kez satır kopyalayıp eklemek için kullanışlı bir araç - Kutools for Excel

Kod kullanmadan bir yöntem tercih ediyorsanız veya toplu çoğaltmayı yönetmek için kullanıcı dostu bir arayüz istiyorsanız, Kutools for Excel pratik bir çözüm sunar. Belirtilen hücre değerine göre satır veya sütunları çoğaltma özelliği, ilgili hücrelerdeki sayıya göre hızlıca satır kopyalayıp eklemenizi sağlar. Bu, bu tür tekrarlayan satır işlemlerini düzenli olarak yapan ve daha görsel, özelleştirilebilir bir süreç arayanlar için idealdir. Kutools, çoğaltma sırasında orijinal tablonun düzenini ve biçimlendirmesini korur, kazara hataların riskini azaltır. Bu yöntem VBA deneyiminize bakılmaksızın sorunsuz bir şekilde çalışır ve orta ila büyük veri aralıkları için verimliliği önemli ölçüde artırır.

1. Kutools > Ekle > Hücre Değerine Göre Satır/Sütun Çoğalt'ı tıklayarak bu özelliği etkinleştirin;
2. Ardından, Kopyala ve Satır Ekle seçeneğini seçin ve İletişim kutusundaki Ekleme Aralığı ve Tekrarlama Sayısı hücrelerini ayrı ayrı belirtin. Seçimlerinizi onaylayın ve Tamam'a tıklayın.

Power Query dönüşümü ile satırları çoğaltma

Power Query, özellikle daha büyük tablolar için veya verileri sık sık yenilemeniz gerektiğinde, sütun değerine göre satırları çoğaltmak için sağlam, tekrarlanabilir bir çözüm sunar. Bu araçla formüller veya kod olmadan sayısal göstergelere göre satırları genişletebilirsiniz. Bu yöntem, adım adım açıklanabilen görsel bir süreç isteyen ve gelecekteki veri güncellemelerinde tekrarlanabilirlik ihtiyacı olan kullanıcılar için iyi çalışır.

1. Verilerinizi bir Excel Tablosuna ekleyin (aralığı seçin ve Ctrl+T tuşlarına basın). Veri > Tablo/Aralıktan'a giderek tablonuzu Power Query'ye yükleyin.

2. Power Query Editörü'nde Sütun Ekle sekmesini seçin ve Özel Sütun'a tıklayın.

3. Aşağıdaki formülü yazarak D sütunundaki değere göre her satır için bir liste oluşturun. (Not: [D]'yi gerçek sütun başlığınızla değiştirmelisiniz. Örneğin, burada Tekrarlama Sayısı'nı seçeceğim ve [D] argümanını değiştirmek için Ekle düğmesine tıklayacağım.)

List.Repeat({1}, [D])

4. Yeni özel sütunun yanındaki Genişlet düğmesine tıklayın ve Yeni Satırlara Genişlet'i tıklayın.

5. Ardından, verilerin D sütunundaki değerlere göre çoğaltıldığını görebilirsiniz, ekran görüntüsüne bakın:

6. Gerekirse yardımcı sütunları kaldırın ve Verileri Excel'e geri yüklemek için Kapat ve Yükle'ye tıklayın.