Vai al contenuto principale

Come inserire righe vuote quando il valore cambia in Excel?

Supponendo di avere un intervallo di dati e ora si desidera inserire righe vuote tra i dati quando il valore cambia, in modo da poter separare gli stessi valori sequenziali in una colonna come mostrato nelle schermate seguenti. In questo articolo, parlerò di alcuni trucchi per risolvere questo problema.

Inserisci righe vuote quando il valore cambia con la funzione Subtotale

Inserisci righe vuote quando il valore cambia con le colonne helper

Inserisci righe vuote quando il valore cambia con il codice VBA

Inserisci un numero specifico di righe vuote quando il valore cambia con una potente funzionalità


Inserisci righe vuote quando il valore cambia con la funzione Subtotale

Grazie alla Totale caratteristica, è possibile inserire righe vuote tra i dati quando il valore cambia come segue:

1. Seleziona l'intervallo di dati che desideri utilizzare.

2. Clic Dati > Totale per aprire il Totale finestra di dialogo e nel file Totale finestra di dialogo, eseguire le seguenti opzioni:

1: Selezionare il nome della colonna in cui si desidera inserire righe vuote in base a quando il valore cambia in Ad ogni cambio nella sezione;
2: Scegli Contare dal Utilizzare la funzione menu `A tendina;
3: Controlla il nome della colonna in cui desideri inserire il totale parziale nel file Aggiungi subtotale a casella di riepilogo

3. Quindi fare clic OK, sono state inserite le linee del subtotale tra i diversi prodotti e i simboli di contorno sono visualizzati a sinistra della tabella, vedi screenshot:

4. Quindi fai clic sul numero 2 nella parte superiore del simbolo del contorno per visualizzare solo le linee del totale parziale.

5. Quindi selezionare i dati dell'intervallo del totale parziale e premere Alt +; tasti di scelta rapida per selezionare solo le righe visibili, vedi screenshot:

6. Dopo aver selezionato solo le righe visibili, premere il tasto Elimina sulla tastiera e tutte le righe del totale parziale sono state rimosse.

7. Quindi fare clic su qualsiasi altra cella e tornare indietro Dati > Separa > Cancella contorno per rimuovere i contorni, vedi screenshot:

8. I simboli di struttura sono stati cancellati immediatamente e puoi vedere righe vuote inserite tra i dati quando il valore cambia, vedi screenshot:

9. Alla fine, puoi eliminare la colonna A di cui hai bisogno.


Inserisci interruzione di pagina, righe vuote, bordo inferiore o colore di riempimento quando il valore cambia rapidamente

Se si dispone di Kutools for Excel's Distinguere le differenze funzione, puoi inserire rapidamente interruzioni di pagina, righe vuote, bordo inferiore o colore di riempimento quando il valore cambia in base alle tue esigenze. Guarda la demo qui sotto.         Fai clic per scaricare Kutools per Excel!


Inserisci righe vuote quando il valore cambia con le colonne helper

Con le colonne helper, puoi inserire prima la formula, quindi applicare il Trova e sostituisci funzione, infine, inserisce le righe vuote tra i valori che cambiano. Si prega di fare quanto segue:

1. In una cella vuota C3, inserisci questa formula = = A3 A2e nella cella D4 immettere questa formula = = A4 A3, vedi screenshot:

2. Quindi selezionare C3: D4 e trascinare il quadratino di riempimento sull'intervallo in cui si desidera applicare queste formule e otterrai I veri or Falso nelle celle, vedi screenshot:

3. E poi premere Ctrl + F chiavi per aprire il Trova e sostituisci dialog, nella finestra di dialogo spuntata, inserisci FALSO nella Trova quello che casella di testo sotto Trovare scheda e fare clic Opzioni pulsante per espandere questa finestra di dialogo e scegliere Valori dal Guarda dentro elenco a discesa, vedi screenshot:

4. Clicchi Trova tutto pulsante, quindi premere Ctrl + A per selezionare tutti i risultati della ricerca, tutte le celle FALSE sono state selezionate contemporaneamente, vedi screenshot:

6. Chiudi il Trova e sostituisci finestra di dialogo, passaggio successivo, è possibile inserire righe vuote facendo clic Casa > inserire > Inserisci righe del foglioe righe vuote sono state inserite nei dati quando il valore cambia in base alla colonna A, vedere screenshot:

7. Infine, puoi eliminare la colonna helper C e D di cui hai bisogno.


Inserisci righe vuote quando il valore cambia con il codice VBA

Se sei stanco di usare i metodi sopra, ecco un codice che può aiutarti a inserire righe vuote tra i valori modificati contemporaneamente.

1. Tieni premuto il ALT + F11 chiavi per aprire il Finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: inserisci righe vuote quando il valore cambia

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. Quindi premere F5 chiave per eseguire questo codice e verrà visualizzata una finestra di messaggio per consentire di selezionare i dati di una colonna in cui si desidera inserire righe vuote quando il valore cambia in base a, vedere screenshot:

4. E poi clicca OK, le righe vuote sono state inserite tra i dati quando il valore cambia in base alla colonna A.


Inserisci un numero specifico di righe vuote quando il valore cambia con una potente funzionalità

Se sei provato con i metodi fastidiosi di cui sopra, qui, introdurrò uno strumento utile, Kutools for Excel's Distinguere le differenze può aiutarti a inserire interruzioni di pagina, righe vuote, bordo inferiore o colore di riempimento quando il valore della cella cambia rapidamente e facilmente.

Suggerimenti:Per applicare questo Distinguere le differenze in primo luogo, dovresti scaricare il file Kutools for Excele quindi applica la funzione in modo rapido e semplice.

Dopo l'installazione Kutools for Excel, per favore fai come questo:

1. Clic Kutools > Formato > Distinguere le differenze, vedi screenshot:

2. Nel Distinguere le differenze per colonna chiave finestra di dialogo, eseguire le seguenti operazioni:

  • Seleziona l'intervallo di dati che desideri utilizzare, quindi scegli la colonna chiave su cui desideri inserire righe vuote;
  • Quindi controlla Riga vuota opzione dal Opzioni sezione e inserisci il numero di righe vuote che desideri inserire.

3. Quindi fare clic Ok pulsante e il numero specifico di righe vuote è stato inserito nei dati se il valore della cella cambia, vedere screenshot:

Fai clic per scaricare Kutools per Excel e prova gratuita ora!

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
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, ...)   |   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...

Descrizione


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 (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, Hassan,

This vba is amazing, whereas I need one more alternate code for insert single blank row after changes in sequencing numbers. Example:- In column having number series like 1, 2, 3, 5, 6, 9 & etc...
Need to add single blank row between 3 & 5 as well as 6 & 9.
Please can you with this.
This comment was minimized by the moderator on the site
Can the VBA method be adapted to ignore blank cells? I have a file which I need to insert rows in based on two different columns but when I run the macro on the second column I end up with three blank lines where the first macro run inserted rows.
Or can it run on two columns at the same time?
This comment was minimized by the moderator on the site
Hello,
Is very usefull in case i need to insert 1 row, but if i need to insert 145 rows in every time the data change in spwcific column, how can i do it??
This comment was minimized by the moderator on the site
Hi, Hassan,
To insert multiple blank rows when value changes in a specific column, you should apply the following VBA code:

Note: In the below code, you should change the number 99 to your need, for example, when you insert 145 blank rows, you should change the number 99 to 144. Please try it, hope it can help you!

Sub InsertRowsAtValueChange()
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
Range(WorkRng.Cells(i, 1).EntireRow, WorkRng.Cells(i + 99, 1).EntireRow).Insert
End If
Next
Application.ScreenUpdating = True
End Sub
This comment was minimized by the moderator on the site
Very helpful. The code that skyyang shows above worked perfectly. Just make sure that the data doesn't already have spaces in it.

I don't understand VBA, but I believe if you wanted to add more rows underneath data that already had the spacing, there should be a way to ignore spaces.

Could a line be added to ignore or skip over blank lines? That might make this code more universal and repeatable if needed. Also a delete function that is similar to this may be useful so undo isn't necessary.
This comment was minimized by the moderator on the site
RE: insert blank rows when value changes with vba code
Is there a way that I can save the Range & not have to pick it every time I run it?
This comment was minimized by the moderator on the site
The VBA code worked 1st time and did exactly what I was trying to do. Thank you so much!
This comment was minimized by the moderator on the site
I've been using my own solution for some time.
1. Insert a helper column into Column A
2. In A2, type "if(B2=B1,A1,A1+1)"
3. Copy that formula down to the last row
4. Copy all the populated cells in column A and Paste Special (Values) over them
5. Copy all the cells again and paste them into column A in the first unpopulated cell (e.g. if you have 104 rows of data plus a header row you would paste into cell A106)
6. Click on Data and Remove Duplicates (only on the cells you just pasted in Step 5; not on all rows)
7. Sort all of Column A
8. Delete Column A

Seems like a lot of steps but only takes a few seconds.
This comment was minimized by the moderator on the site
[quote]Hi all thank you!! its awesome , can you guys also let me how to insert 2 rows when the value changes in VBA or through excel.By Hudson[/quote] Please let me know how to insert more than 1 row.
This comment was minimized by the moderator on the site
Hi there, These are almost useful! The first method doesn't work for me because when I follow the steps explicitly, the the data that I delete in the subtotal panes deletes the entire columns that I've sorted. In the second method when I get to the step where I insert sheet rows, the rows are inserted ABOVE the FALSE cells which breaks up the data, but the last selection of every group is then added to the group below. Any advice???
This comment was minimized by the moderator on the site
Hi all thank you!! its awesome , can you guys also let me how to insert 2 rows when the value changes in VBA or through excel.
This comment was minimized by the moderator on the site
Where in the code would I need to modify to include more than one row, I need to add 10 after each break... Thanks
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations