Excel'de satır eklerken formülü otomatik olarak nasıl doldurabilirsiniz?

Mevcut veri satırları arasına boş satırlar eklediğinizde, formül yeni satıra kopyalanıp yapıştırılmaz, bunu manuel olarak sürüklemeniz veya doldurmanız gerekir. Ancak, bazen aşağıdaki ekran görüntüsünde gösterildiği gibi, veri aralığına boş satırlar eklediğinizde formülü otomatik olarak doldurmak isteyebilirsiniz. Bu makalede, bu görevi çözmek için bazı hızlı ipuçlarından bahsedeceğim.

Boş satırlar eklerken tablo oluşturarak formülü otomatik doldurma

Boş satırlar eklerken VBA kodu ile formülü otomatik doldurma

Boş satırlar eklerken tablo oluşturarak formülü otomatik doldurma

Excel'de, Tablo formatı, yukarıdaki formülü yeni eklenen boş satırlara otomatik olarak doldurmanıza yardımcı olabilir. Lütfen aşağıdaki adımları izleyin:

1. Formülü otomatik doldurmak istediğiniz veri aralığını seçin ve ardından Ekle > Tablo'ya tıklayın, aşağıdaki ekran görüntüsüne bakın:

2. Tablo Oluştur iletişim kutusunda, verilerinizde başlıklar varsa Tablomun başlıkları var seçeneğini işaretleyin, aşağıdaki ekran görüntüsüne bakın:

3. Ardından Tamam düğmesine tıklayın ve tablo oluşturuldu. Şimdi, bir boş satır eklediğinizde, yukarıdaki formül yeni satıra otomatik olarak eklenecektir, aşağıdaki ekran görüntüsüne bakın:

Boş satırlar eklerken VBA kodu ile formülü otomatik doldurma

Verileri tabloya dönüştürmek istemiyorsanız, aşağıdaki VBA kodu da bu sorunu çözmenize yardımcı olabilir.

1. Otomatik doldurmak istediğiniz formülleri içeren çalışma sayfası sekmesini seçin ve sağ tıklayarak Bağlam Menüsünden Kodu Görüntüle'yi seçerek Microsoft Visual Basic for Applications penceresine gidin, ardından aşağıdaki kodu Modüle kopyalayıp yapıştırın:

VBA kodu: Boş satırlar eklerken formülü otomatik doldurma

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice 20160725
    Cancel = True
    Target.Offset(1).EntireRow.Insert
    Target.EntireRow.Copy Target.Offset(1).EntireRow
    On Error Resume Next
    Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub

2. Ardından bu kodu kaydedip kapatın, çalışma sayfasına geri dönün. Şimdi, veriler arasında bir hücreye çift tıkladığınızda, aktif hücrenin altına yeni bir satır eklenecek ve formül de otomatik olarak doldurulacaktır.

Gösteri: Boş satırlar eklerken formülü otomatik doldurma