Ugrás a tartalomra

Hogyan lehet részleges sort beszúrni vagy törölni az Excelben?

Szerző: Siluvia Utolsó módosítás: 2024-09-26

Könnyű egy egész sort beszúrni vagy törölni az Excel munkalapjáról. De hogyan lehet csak részleges sort beszúrni vagy törölni a munkalapból? Ez a cikk segít Önnek.

Részleges sor beszúrása vagy törlése a Cella beszúrása / törlése funkcióval
Helyezzen be vagy töröljön részleges sort VBA kóddal


Részleges sor beszúrása vagy törlése a Cella beszúrása / törlése funkcióval

Például három cellával be akar illeszteni vagy törölni egy részleges sort az 5. sorból, kérjük, tegye a következőket.

Helyezze be a részleges sort

1. Jelöljön ki három cellát az 5. sorból (a kijelölt celláknak meg kell egyeznie a beillesztett cellákkal), majd kattintson betétlap > Helyezze be a cellákat alatt Főoldal fülre. Lásd a képernyőképet:

kattintson a Beszúrás > Cellák beszúrása lehetőségre a Kezdőlap lapon

2. Ban,-ben betétlap párbeszédpanelen válassza ki Változtassa a cellákat jobbra or Változtassa le a cellákat majd kattintson a OK gombot.

válassza a Cellák eltolása jobbra vagy a Cellák eltolása le lehetőséget

Ezután a három cellával ellátott részsort beszúrjuk az alábbi képernyőkép szerint.

részleges sor három cellával kerül beillesztésre

Részleges sor törlése

1. A törlendő részsor kiválasztása után kattintson a Törlés> gombra Cellák törlése alatt Főoldal Tab.

2. Ban,-ben töröl párbeszédpanelen válassza ki Váltó cellák maradtak or Változtassa a cellákat szükség szerint, majd kattintson a gombra OK gomb. Lásd a képernyőképet:

A Törlés párbeszédpanelen válassza a Cellák eltolása balra vagy a Cellák eltolása felfelé lehetőséget

Ezután a kijelölt részsor törlődik.

az excel ai kutools képernyőképe

Oldja fel az Excel Magic alkalmazást a Kutools AI segítségével

  • Intelligens végrehajtás: Cellaműveletek végrehajtása, adatok elemzése és diagramok létrehozása – mindezt egyszerű parancsok hajtják végre.
  • Egyedi képletek: Személyre szabott képleteket állíthat elő a munkafolyamatok egyszerűsítéséhez.
  • VBA kódolás: Írjon és implementáljon VBA kódot könnyedén.
  • Képlet értelmezése: Könnyedén megértheti az összetett képleteket.
  • Szöveg fordítása: Törje le a nyelvi akadályokat a táblázatokban.
Növelje Excel képességeit AI-alapú eszközökkel. Töltse le most és tapasztalja meg a még soha nem látott hatékonyságot!

Helyezzen be vagy töröljön részleges sort VBA kóddal

A következő VBA-kódokat alkalmazhatja részleges sor beszúrására vagy törlésére az Excel-ben.

1. Válasszon ki egy cellát egy bizonyos sorból, ahová részleges sorokat szeretne beilleszteni, majd nyomja meg a gombot más + F11 megnyitni Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja és illessze be az alábbi VBA kódot a Kód ablak.

VBA kód: Helyezzen be részleges sort az Excelbe

Sub InsertRow()
    Dim I As Long
    On Error Resume Next
LInput:
    I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
    If I < 1 Then
        MsgBox "Error, please retype", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Insert xlDown
End Sub

Megjegyzések: A VBA kódban az 1. szám azt jelenti, hogy a részleges sort beillesztik az első oszlopból, a 3. szám pedig azt, hogy három cellát illeszt be az oszlopok közé. Az igényei alapján megváltoztathatja őket.

3. megnyomni a F5 gombot a kód futtatásához, majd a Kutools az Excel számára megjelenik a párbeszédpanel, adja meg a szükséges sorok számát, majd kattintson a gombra OK gombot.

Ha beírja a 3 mezőt, kattintson a gombra OK gombra, három részleges három oszlopos sor kerül beillesztésre a munkalap meghatározott helyére.

vba kódot a szükséges sorok számának megadásához

A részleges rész törléséhez futtathatja az alábbi VBA kódot.

VBA kód: Törölje az Excel részleges sorát

Sub DelActiveCell_Row()
    Dim I As Long
    On Error Resume Next
LInput:
    I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
    If I < 1 Then
        MsgBox " Error, please retype", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Delete xlShiftUp
End Sub

A kód futtatása után szintén van egy Kutools az Excel számára megjelenik a párbeszédpanel, amely emlékezteti Önt, hogy hány részsort szeretne törölni, kérjük, írja be a számot, majd kattintson a gombra OK gomb. Ezután a megadott részsorokat azonnal törli.

A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!