How to add border line below when value changes in an Excel column?
There is a list of data which includes repeat values, and for better classifying the values, I add a border line below when the value changes in the list as below screenshot shown. In this article, I will talk about how to quickly add border line below when the value changes in an Excel column.
Recommended Excel Productivity Tools
Obviously, there is no built-in function in Excel that can help you to add border line below when value changes, but there is a VBA code I can introduce.
1. Press Alt + F11 keys to enable Microsoft Visual Basic for Applications window.
2. Click Insert > Module, and paste below code to the blank script Module.
VBA: add border line below when value changes
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. Press F5 key to execute the code. Then the border lines have been added below when value changes in the selection A2:A.