Bir Excel sütununda değer değiştiğinde aşağıdaki kenar çizgisi nasıl eklenir?

Yineleme değerlerini içeren bir veri listesi var ve değerleri daha iyi sınıflandırmak için, aşağıda gösterilen ekran görüntüsü gibi listedeki değer değiştiğinde aşağıya bir kenar çizgisi ekliyorum. Bu yazımda bir Excel sütununda değer değiştiğinde aşağıya hızlı bir şekilde kenar çizgisinin nasıl ekleneceğinden bahsedeceğim.

VBA ile değer değiştiğinde aşağıya sınır çizgisi ekleyin

VBA ile değer değiştiğinde aşağıya sınır çizgisi ekleyin

Açıkçası, Excel'de değer değiştiğinde altına kenar çizgisi eklemenize yardımcı olabilecek yerleşik bir işlev yok, ancak tanıtabileceğim bir VBA kodu var.

1. Basın Alt + F1Etkinleştirmek için 1 anahtar Uygulamalar için Microsoft Visual Basic pencere.

2. tık Ekle > modülve aşağıdaki kodu boş komut dosyasına yapıştırın modüle.

VBA: değer değiştiğinde altına sınır çizgisi ekleyin

Sub AddBorderLineWhenValueChanges()
'UpdatebyExtendoffice20160918
    Application.ScreenUpdating = False
    Dim LastRow As Long
    Dim xrg As Range
    LastRow = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
    For Each xrg In Range("A2:A" & LastRow)
        If xrg <> xrg.Offset(1, 0) Then
            Range("A" & xrg.Row & ":K" & xrg.Row).Borders(xlEdgeBottom).LineStyle = xlContinuous
        End If
    Next xrg
    Application.ScreenUpdating = True
End Sub

3. Basın F5 kodu yürütmek için anahtar. Daha sonra A2: A seçimindeki değer değiştiğinde aşağıya kenar çizgileri eklenmiştir.

not: VBA kodunda A2: A, değeri değiştiğinde altına kenar çizgisi eklemek istediğiniz aralıktır, istediğiniz gibi değiştirebilirsiniz.

Bahşiş: Her n'inci satıra bir başlık satırı eklemek istiyorsanız, uygulamayı deneyebilirsiniz. Başlık Satırları Ekle yarar Kutools for Excel Bu işi aşağıda gösterilen ekran görüntüsü gibi hızlı bir şekilde çözmek için, sınırlama olmaksızın tam işlevseldir.

lütfen şimdi indirin ve ücretsiz deneme yapın.

En İyi Ofis Üretkenlik Araçları

🤖	Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
	Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
	Süper Arama: Çoklu Ölçütlü VLookup  |   Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
	Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
	Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
	Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu   |  Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz   |  E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
	En İyi 15 Araç Seti:  12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

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...

Devamı ... Ücretsiz indirin...

---

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!

Devamı ... Ücretsiz indirin...