Vai al contenuto principale

Come aggiungere una linea di confine sotto quando il valore cambia in una colonna di Excel?

C'è un elenco di dati che include valori di ripetizione e, per classificare meglio i valori, aggiungo una linea di confine sotto quando il valore cambia nell'elenco come mostrato nell'immagine sottostante. In questo articolo, parlerò di come aggiungere rapidamente la linea di confine sotto quando il valore cambia in una colonna di Excel.
doc aggiungi la linea di confine sotto quando il valore cambia 1

Aggiungi una linea di confine sotto quando il valore cambia con VBA


freccia blu freccia destra Aggiungi una linea di confine sotto quando il valore cambia con VBA

Ovviamente, non esiste una funzione incorporata in Excel che possa aiutarti ad aggiungere una linea di confine sotto quando il valore cambia, ma c'è un codice VBA che posso introdurre.

1. Stampa Alt + F11 tasti per abilitare Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Modulie incolla il codice sottostante nello script vuoto Module.

VBA: aggiungi la linea di confine sotto quando il valore cambia

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

doc aggiungi la linea di confine sotto quando il valore cambia 2

3. Stampa F5 tasto per eseguire il codice. Quindi le linee di confine sono state aggiunte di seguito quando il valore cambia nella selezione A2: A.
doc aggiungi la linea di confine sotto quando il valore cambia 1

Note:: Nel codice VBA, A2: A è l'intervallo a cui si desidera aggiungere la linea di confine sotto quando il suo valore cambia, è possibile modificarlo quando necessario.

Mancia: Se vuoi inserire una riga del titolo in ogni ennesima riga, puoi provare ad applicare Inserisci righe del titolo utilità di Kutools for Excel per risolvere rapidamente questo lavoro come mostrato nell'immagine sottostante.È piena funzionalità senza limitazioni in

Kutools for Excel, con oltre 300 funzioni utili, rende il tuo lavoro più facile. 
giorni, si prega di scaricare e avere una prova gratuita ora.
doc aggiungi la linea di confine sotto quando il valore cambia 3

I migliori strumenti per la produttività in ufficio

Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   Più di 50 Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

scheda kte 201905


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations