Hur infogar jag tom rad ovanför specifik text i Excel?
![]() | ![]() | ![]() |
Har du någonsin försökt infoga tom rad ovanför en specifik text i en kolumn när du arbetar på ett kalkylblad? Till exempel finns det några namn i kolumn A, nu vill jag infoga tomma rader ovanför cellerna som innehåller namnet "Mike" som den vänstra skärmdumpen visas, kanske finns det inget direkt sätt för dig att lösa denna uppgift i Excel . Den här artikeln kommer jag att prata om några bra knep för att hantera detta jobb i Excel.
Infoga tom rad ovanför specifik text med VBA-kod
För att infoga tom rad ovanför den specifika texten manuellt kommer en och en att slösa mycket tid, här skapar jag en VBA-kod för att du ska kunna infoga den tomma raden ovanför specifikt cellvärde på en gång.
1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic för applikationer fönster.
2. Klicka Insert > Modulernaoch klistra sedan in följande makro i Modulerna Fönster.
VBA-kod: Infoga snabbt tom rad ovanför specifik text
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. Tryck sedan på F5 nyckel för att köra den här koden, och en dialogruta dyker upp för att påminna dig om att du väljer kolumndata som innehåller specifik text som du vill infoga raden ovan, se skärmdump:
4. Och klicka sedan på OK -knappen har de tomma raderna infogats ovanför den specifika texten ”Mike”.
Anmärkningar: I ovanstående kod kan du ändra textvärdet “Mikrofon”Till andra värden som du önskar från skriptet Om InStr (1, xRng.Cells (i, 1) .Värde, "Mike")> 0 Sedan.
Infoga tom rad ovanför specifik text med Kutools för Excel
Om du Kutools för Excel, med dess Välj specifika celler Du kan välja de angivna cellvärdena först och sedan använda verktyget Infoga arkrader i Excel för att infoga de tomma raderna på en gång.
När du har installerat Kutools för Excel, gör så här:
1. Välj det dataområde du vill använda.
2. Klicka sedan Kutools > Välja > Välj specifika celler, se skärmdump:
3. I Välj specifika celler dialogrutan väljer du Cell under Urvalstypoch ange sedan de kriterier som du behöver under Specifik typ avsnitt, i det här fallet väljer jag lika från Specifik typ, och ange namnet som jag vill välja, se skärmdump:
4. Klicka sedan Ok -knappen, alla celler som är Mike är markerade på en gång, se skärmdump:
5. När du har valt specifika textceller klickar du på Hem > Insert > Infoga arkrader, och de tomma raderna infogas ovanför den markerade texten, se skärmdumpar:
![]() | ![]() | ![]() |
Ladda ner och testa gratis Kutools för Excel nu!
Demo: Infoga tom rad ovanför specifik text med Kutools för Excel
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!