Note: The other languages of the website are Google-translated. Back to English

Come inserire una riga vuota sopra un testo specifico in Excel?

doc inserire una riga sopra il testo specifico 1 2 doc inserire una riga sopra il testo specifico 2

Quando lavori su un foglio di lavoro, hai mai provato a inserire una riga vuota sopra un testo specifico in una colonna? Ad esempio, ci sono alcuni nomi nella colonna A, ora, voglio inserire righe vuote sopra le celle che contengono il nome "Mike" come mostrato nell'immagine a sinistra, forse, non esiste un modo diretto per risolvere questo compito in Excel . In questo articolo, parlerò di alcuni buoni trucchi per affrontare questo lavoro in Excel.

Inserisci una riga vuota sopra il testo specifico con il codice VBA

Inserisci una riga vuota sopra il testo specifico con Kutools per Excel


Inserisci una riga vuota sopra il testo specifico con il codice VBA

Per inserire manualmente una riga vuota sopra il testo specifico uno per uno sprecherò un sacco di tempo, qui creerò un codice VBA per poter inserire la riga vuota sopra il valore della cella specifica contemporaneamente.

1. Tieni premuto il ALT + F11 chiavi e apre il file Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduloe quindi incolla la seguente macro nel file Modulo Finestra.

Codice VBA: inserisci rapidamente una riga vuota sopra un testo specifico

Sub test1()
'updateby Extendoffice
    Dim i As Long
    Dim xLast As Long
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the column with specific text:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count > 1) Then
        MsgBox "the selected range must be one column", , "Kutools for Excel"
        Exit Sub
    End If
    xLast = xRng.Rows.Count
    For i = xLast To 1 Step -1
      If InStr(1, xRng.Cells(i, 1).Value, "Mike") > 0 Then
        Rows(xRng.Cells(i, 1).Row).Insert shift:=xlDown
      End If
    Next
End Sub

3. Quindi premere F5 chiave per eseguire questo codice e verrà visualizzata una finestra di dialogo per ricordarti di selezionare i dati della colonna che contengono il testo specifico che desideri inserire nella riga sopra, vedi screenshot:

doc inserire una riga sopra il testo specifico 3

4. E poi clicca OK pulsante, le righe vuote sono state inserite sopra il testo specifico “Mike”.

Note:: Nel codice sopra, puoi modificare il valore del testo "Mike"A qualsiasi altro valore desiderato dallo script Se InStr (1, xRng.Cells (i, 1) .Value, "Mike")> 0 Poi.


Inserisci una riga vuota sopra il testo specifico con Kutools per Excel

Se si dispone di Kutools for Excel, Con la sua Seleziona celle specifiche funzione, è possibile selezionare prima i valori di cella specificati, quindi applicare l'utilità Inserisci righe del foglio di Excel per inserire le righe vuote contemporaneamente.

Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni

Dopo l'installazione Kutools for Excel, si prega di fare come segue:

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

2. Quindi fare clic Kutools > Seleziona > Seleziona celle specifiche, vedi screenshot:

3. Nel Seleziona celle specifiche finestra di dialogo, selezionare Cella sotto il Tipo di selezione, quindi specifica i criteri di cui hai bisogno in Tipo specifico sezione, in questo caso, sceglierò Equivale dal Tipo specificoe inserisci il nome che voglio selezionare, vedi screenshot:

doc inserire una riga sopra il testo specifico 5

4. Quindi fare clic Ok pulsante, tutte le celle il cui valore è Mike vengono selezionate contemporaneamente, vedi screenshot:

doc inserire una riga sopra il testo specifico 6

5. Dopo aver selezionato le celle di testo specifiche, fare clic su Casa > inserire > Inserisci righe del foglioe le righe vuote verranno inserite sopra il testo selezionato, vedi screenshot:

doc inserire una riga sopra il testo specifico 7 2 doc inserire una riga sopra il testo specifico 2

 Scarica e prova gratuitamente Kutools per Excel ora!


Demo: inserisci una riga vuota sopra il testo specifico con Kutools per Excel

Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scarica e prova gratuita ora!

I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il 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!
fondo officetab
Commenti (7)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Salve, ho un problema simile a quello sopra. Cosa succede se voglio selezionare la cella al di sotto di un criterio specificato? Ad esempio, puoi usare l'esempio sopra. voglio selezionare la cella sotto "Mike". c'è una via d'uscita facile?
Questo commento è stato fatto dal moderatore sul sito
@SSJ hai mai trovato una soluzione?
Questo commento è stato fatto dal moderatore sul sito
Ciao ragazzi,

Per inserire righe vuote sotto un valore di cella specifico, puoi applicare il codice seguente:

Sottolinea vuota()
Dim Rng come intervallo
Dim WorkRng come intervallo
On Error Resume Next
xTitleId = "KtoolsforExcel"
Imposta WorkRng = Selezione.Applicazione
Imposta WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Tipo:=8)
Imposta WorkRng = WorkRng.Columns(1)
xLastRow = WorkRng.Rows.Count
Application.ScreenUpdating = False
Per xRowIndex = xLastRow A 1 passaggio -1
Imposta Rng = WorkRng.Range ("A" & xRowIndex)
Se Rng.Value = "Mike" Allora
Rng.Offset(1, 0).EntireRow.Insert Shift:=xlDown
End If
Successiva
Application.ScreenUpdating = True
End Sub

Si prega di modificare i criteri "Mike" con il proprio valore di cella.

Spero che possa aiutarti, grazie!
Questo commento è stato fatto dal moderatore sul sito
grazie! ha funzionato.
Questo commento è stato fatto dal moderatore sul sito
Questo è stato fantastico per i dati che ho. Mi chiedevo se potessi aiutarmi a fare un passo avanti. Sono stato in grado di dividere i miei dati in base a questo, ma poi ho bisogno di codificare a colori i miei gruppi di dati. Quando divido i miei dati, ho un numero variabile di righe da 1 a 50 e ho 36 colonne di dati incluse 32 colonne di cui ho bisogno per confrontare i valori all'interno della riga superiore. Attualmente sto selezionando manualmente ogni gruppo (separato da una riga vuota) e quindi sto usando ctrl+shift+| per evidenziare le differenze di colonna e formattare quelle celle per evidenziare le differenze.


C'è qualcuno che potrebbe scrivere un codice per selezionare e formattare quelle differenze di colonna all'interno dei raggruppamenti, usando la riga vuota come separatore?
Questo commento è stato fatto dal moderatore sul sito
C'è un modo per non visualizzare la finestra di dialogo con pop-out per ricordarmi di selezionare i dati della colonna che contengono il testo specifico che voglio inserire la riga sopra, se una cella specificata è piena di dati, il processo viene eseguito automaticamente, senza richieste e inserisci riga sopra?
Questo commento è stato fatto dal moderatore sul sito
Provo a farlo per mettere una riga vuota dopo ogni cella non vuota, ma excel dice. "Quel comando non può essere utilizzato su selezioni multiple"
Perché non funziona per me???
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL