Excel'de değer değiştiğinde boş satırlar nasıl eklenir?
Bir dizi veriye sahip olduğunuzu varsayarsak ve şimdi değer değiştiğinde veriler arasına boş satırlar eklemek istiyorsunuz, böylece bir sütundaki sıralı aynı değerleri aşağıda gösterilen ekran görüntüleriyle ayırabilirsiniz. Bu yazıda, bu sorunu çözmeniz için bazı püf noktalarından bahsedeceğim.
Alt Toplam işleviyle değer değiştiğinde boş satırlar ekle
Yardımcı sütunlarla değer değiştiğinde boş satırlar ekle
VBA kodu ile değer değiştiğinde boş satırlar ekleyin
Güçlü bir özellikle değer değiştiğinde belirli sayıda boş satır ekleyin
Alt Toplam işleviyle değer değiştiğinde boş satırlar ekle
İle Ara Toplam özelliği, aşağıdaki adımlar gibi değer değiştiğinde veriler arasına boş satırlar ekleyebilirsiniz:
1. Kullanmak istediğiniz veri aralığını seçin.
2. tıklayın Veri > Ara Toplam açmak için Ara Toplam iletişim kutusunda ve Ara Toplam iletişim kutusu, lütfen aşağıdaki seçenekleri yapın:
1: Değerin ne zaman değiştiğine bağlı olarak boş satırlar eklemek istediğiniz sütun adını seçin. Her değişimde kısımda;
2: Seçmek saymak itibaren Kullanım fonksiyonu açılır liste;
3: Alt toplamı eklemek istediğiniz sütun adını kontrol edin. Ara toplam ekle liste kutusu
|
3. Sonra tıklayın OKara toplam satırları farklı ürünler arasına eklenmiştir ve tablonun solunda ana hat sembolleri görüntülenir, ekran görüntüsüne bakın:
4. Ve sonra sadece ara toplam satırlarını görüntülemek için anahat sembolünün üstündeki 2 rakamını tıklayın.
5. Ardından ara toplam aralığı verilerini seçin ve Alt +; sadece görünür satırları seçmek için kısayol tuşları, ekran görüntüsüne bakın:
6. Yalnızca görünen satırları seçtikten sonra Sil tuş ve tüm ara toplam satırları kaldırıldı.
7. Sonra başka bir hücreyi tıklayın ve geri dönün Veri > Çöz > Anahattı Temizle Anahatları kaldırmak için ekran görüntüsüne bakın:
8. Anahat sembolleri bir kerede silindi ve değer değiştiğinde veriler arasına boş satırların eklendiğini görebilirsiniz, ekran görüntüsüne bakın:
9. Sonunda, ihtiyaç duyduğunuzda A sütununu silebilirsiniz.
Değer hızla değiştiğinde sayfa sonu, boş satırlar, alt kenarlık veya dolgu rengi ekleyin
Eğer varsa Kutools for Excel's Farklılıkları ayırt edin özelliği sayesinde, ihtiyaç duyduğunuzda değer değiştiğinde hızla sayfa sonu, boş satırlar, alt kenarlık veya dolgu rengi ekleyebilirsiniz. Aşağıdaki demoya bakın. Kutools for Excel'i indirmek için tıklayın!
Yardımcı sütunlarla değer değiştiğinde boş satırlar ekle
Yardımcı sütunlarla önce formül ekleyebilir ve ardından Bul ve Değiştir işlevi, sonunda, değişen değerler arasına boş satırlar ekleyin. Lütfen aşağıdaki işlemleri yapın:
1. Boş bir C3 hücresine lütfen bu formülü girin = A3 = A2ve D4 hücresine bu formülü girin = A4 = A3, ekran görüntüsüne bakın:
2. Ardından C3: D4'ü seçin ve doldurma tutamacını bu formülleri uygulamak istediğiniz aralığın üzerine sürükleyin; Gerçek or Yanlış hücrelerde ekran görüntüsüne bakın:
3. Ve sonra tuşuna basın. Ctrl + F tuşlarını açmak için Bul ve Değiştir iletişim kutusunda, açılan iletişim kutusunda şunu girin: YANLIŞ içine Ne bul altındaki metin kutusu bulmak sekmesini tıklayın ve tıklayın. Opsiyonlar Bu iletişim kutusunu genişletmek için düğmesine basın ve Değerler itibaren Arama konumu açılır liste, ekran görüntüsüne bakın:
4. Tıkla Hepsini bul düğmesine ve ardından Ctrl + A bulmanın tüm sonuçlarını seçmek için, tüm FALSE hücreleri aynı anda seçildi, ekran görüntüsüne bakın:
6. Kapat Bul ve Değiştir iletişim kutusu, sonraki adımda, tıklayarak boş satırlar ekleyebilirsiniz. Ana Sayfa > Ekle > Sayfa Satırları Ekleve değer A sütununa göre değiştiğinde verilere boş satırlar eklenmiştir, ekran görüntülerine bakın:
7. Son olarak, ihtiyaç duyduğunuzda yardımcı sütun C ve D'yi silebilirsiniz.
VBA kodu ile değer değiştiğinde boş satırlar ekleyin
Yukarıdaki yöntemleri kullanmaktan sıkıldıysanız, burada bir kod da değiştirilen değerler arasına aynı anda boş satırlar eklemenize yardımcı olabilir.
1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic penceresi.
2. tıklayın Ekle > modülve aşağıdaki kodu Modül Penceresi.
VBA kodu: Değer değiştiğinde boş satırlar ekleyin
Sub InsertRowsAtValueChange()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 2 Step -1
If WorkRng.Cells(i, 1).Value <> WorkRng.Cells(i - 1, 1).Value Then
WorkRng.Cells(i, 1).EntireRow.Insert
End If
Next
Application.ScreenUpdating = True
End Sub
3. Daha sonra tuşuna basın. F5 Bu kodu çalıştırmak için tuşuna basın ve temel aldığınız değer değiştiğinde boş satırlar eklemek istediğiniz bir sütun verisini seçmenize izin veren bir istem kutusu açılır, ekran görüntüsüne bakın:
4. Ve sonra tıklayın OKdeğer A sütununa göre değiştiğinde veriler arasına boş satırlar eklenmiştir.
Güçlü bir özellikle değer değiştiğinde belirli sayıda boş satır ekleyin
Yukarıdaki zahmetli yöntemlerle denendiyseniz burada size faydalı bir araç tanıtacağım, Kutools for Excel's Farklılıkları ayırt edin hücre değeri hızlı ve kolay bir şekilde değiştiğinde sayfa sonu, boş satırlar, alt kenarlık veya dolgu rengi eklemenize yardımcı olabilir.
İpuçları:Bunu uygulamak için Farklılıkları ayırt edin özelliği, öncelikle indirmelisiniz Kutools for Excelve ardından özelliği hızlı ve kolay bir şekilde uygulayın.
Kurduktan sonra Kutools for Excellütfen şunu yapın:
1. tıklayın Kutools > oluşturulan > Farklılıkları ayırt edin, ekran görüntüsüne bakın:
2. In Farklılıkları anahtar sütuna göre ayırt edin iletişim kutusu, lütfen aşağıdaki işlemleri yapın:
- Kullanmak istediğiniz veri aralığını seçin ve ardından temel alan boş satırlar eklemek istediğiniz anahtar sütununu seçin;
- Sonra kontrol et Boş satır seçeneği Opsiyonlar bölümüne gidin ve eklemek istediğiniz boş satırların sayısını girin.
3. Sonra tıklayın Ok düğmesi ve hücre değeri değişirse verilere belirli sayıda boş satır eklenmişse, ekran görüntülerine bakın:
Kutools for Excel'i indirmek için tıklayın ve Şimdi ücretsiz deneme!
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!