Delete Entire Row using VBA – Excel Macro Example Code

Excel VBA kód a Delete Entire Row példa segít nekünk törölni sorokat az Excel munkalapon. A sorok törlése módszerrel törölhetjük a teljes sort. Ebben a példában látni fogjuk, hogyan lehet törölni a teljes sort az excel munkalapon a VBA segítségével. Az egész sorok törlésére szolgáló Excel VBA makró kódjának a Microsoft Excel 2003, Excel 2007, Excel 2010 és Excel 2013 összes verziójához működnie kell.

VBA kód az egész sor törléséhez

Itt van a VBA törlése teljes sor makró szintaxis és példa VBA makró kódja az egész sor törléséhez az Excel munkalapokból. Ez segít abban, hogy megtudja, hogyan lehet törölni az egész sort az Excel munkafüzetből a VBA segítségével.

VBA Delete Entire Row: Syntax

A következő a VBA delete entire row macro Syntax and sample VBA macro command to Delete Entire Row from worksheet using VBA. A munkalap Rows objektumának Delete módszerét használjuk.


Rows(

).EntireRow.Delete


Itt a Row Number a törlendő sor száma. És az EntireRow.Delete módszerrel töröljük a teljes sort az Excel táblázatkezelőből.

Teljes sor törlése a VBA segítségével: Példák

A következő Excel VBA Delete entire row makro kód a teljes sor törlésére szolgál a munkalapról. Ez a VBA teljes sor törlése makró törli a kódban említett sort.

Sub sbVBS_To_Delete_EntireRow () Rows(1).EntireRow.DeleteEnd Sub

Instrukciók a VBA makró kód futtatásához a teljes sor törléséhez

Kérjük, kövesse az alábbi lépéseket a VBA teljes sor törlése makró végrehajtásához.
1. lépés: Nyissa meg bármely meglévő Excel munkafüzetet.
2. lépés: Nyomja meg az Alt+F11 billentyűkombinációt – Ez megnyitja a VBA szerkesztőt.
3. lépés: Szúrjon be egy kódmodult a majd beszúrás menüből.
4. lépés: Másolja ki a fenti kódot, és illessze be a kódmodulba, amelyet a fenti lépésben beszúrt.
5. lépés: Adjon be néhány mintaadatot az 1. sorba.
6. lépés: Most nyomja meg az F5 billentyűt a kód végrehajtásához.

Most megfigyelheti, hogy a teljes 1. sor törlődik a munkalapról.

Magyarázott VBA kód a teljes sor törléséhez:

A program és az aleljárás indítása a VBA kód megírásához a teljes sor törléséhez a lapról.
Sub sbVBS_To_Delete_EntireRow_C()

‘A törlendő sorok megadása és a sorok törlése az EntireRow.Delete módszerrel.
Rows(1).EntireRow.Delete

‘Az aleljárás befejezése a teljes sor törléséhez.
End Sub

Itt Rows(1) azt mondja az excelnek, hogy törölje a munkalap 1. sorát. És a Delete módszer törli az egész sort a munkalapról.

VBA to Delete Entire Row in Excel :

Ha az első néhány sort szeretné törölni az excelben, akkor a törlési parancsot többször is megismételheti. A következő VBA egész sor törlése makró kódpélda megmutatja, hogyan lehet törölni az első 3 sort a munkalapon.

Sub sbVBS_To_Delete_FirstFewRows_in_Excel() Rows(1).EntireRow.Delete Rows(1).EntireRow.Delete Rows(1).EntireRow.DeleteEnd Sub

A példában látható, hogy a törlési parancsot háromszor megismétli. Először az első sort törli, amikor az első sort töröljük. A következő sor lesz (2. sor) az első sor. Tehát ha újra töröljük az első sort. A következő sor (3. sor) lesz az első sor. Ez azt jelenti, hogy az első három sort töröltük a VBA segítségével.

VBA to Delete Entire Row in Excel : VBA code Explained

Here is the explanation of the VBA delete entire rowMacro to Delete first three rows in Excel.

Az első néhány (3) sor törlésére szolgáló VBA-parancsok megírására szolgáló eljárás indítása.
Sub sbVBS_To_Delete_FirstFewRows_in_Excel_C()

‘Első sor törlése
Rows(1).EntireRow.Delete
‘Most Második sor lesz az első sor- ismét töröljük az első sort.
Rows(1).EntireRow.Delete
‘Most Harmadik sor lesz az első sor- ismét delete parancs törli az első sort.
Rows(1).EntireRow.Delete
‘Töröltük az első 3 sort, és itt befejezzük az aleljárást.
End Sub

VBA to Delete Entire Row in Excel : Using For Loop

Itt a példa VBA makró az első néhány sor törlésére For Loop használatával. Ez az első 10 rekordot törli a For loop használatával a VBA-ban.

Sub sbVBS_To_Delete_EntireRow_For_Loop()Dim iCntr For iCntr = 1 To 10 Step 1 Rows(1).EntireRow.Delete NextEnd Sub

VBA to Delete Entire Row in Excel : Using For Loop – Explanation

Itt van a sor törlésének részletes magyarázata a for loop használatával a VBA-ban.

Az aleljárás elindítása a VBA makró megírásához a sorok törléséhez a VBA for ciklus használatával.
Sub sbVBS_To_Delete_EntireRow_For_Loop_C()
‘Az iCntr változó deklarálása a for ciklus iterációinak tárolásához.
Dim iCntr
‘a for ciklus segítségével végighaladunk a sorokon, itt a step utasítás jelzi az iCntr inkrementálását.
For iCntr = 1 To 10 Step 1
‘az első sor törlése.
Rows(1).EntireRow.Delete
Next
‘Az első sort 10 alkalommal töröltük, vagyis az első 10 sort töröltük az excel táblázatban a for ciklus és a VBA segítségével.
End Sub

VBA to Delete Entire Row in Excel : Using Do while Loop

Itt a példa VBA delete entire row macro to delete the first few rows using Do while Loop. Ez az első 10 rekordot törli a For ciklus használatával a VBA-ban.

Sub sbVBS_To_Delete_EntireRow_Do_while_Loop()Dim iCntriCntr = 10 ' Last row Do While iCntr >= 1 Rows(iCntr).EntireRow.Delete iCntr = iCntr - 1 LoopEnd Sub

VBA to Delete Entire Row in Excel : Using Using Using Do while Loop – Explanation

Itt a magyarázat a fenti VBA delete entire row makróhoz a sorok törléséhez Do while loop használatával.

A VBA makró indítása a sorok törléséhez a do while ciklus használatával.
Sub sbVBS_To_Delete_EntireRow_Do_while_Loop()
‘Az utolsó sorszámot tároló változó deklarálása és számlálóváltozóként való használata.
Dim iCntr
‘Az utolsó sorérték hozzárendelése az iCntr-hez.
iCntr = 10 ‘ Utolsó sor
‘A do while ciklus segítségével töröljük a sorokat az utolsó (10.) sorból .
Do While iCntr >= 1
Rows(iCntr).EntireRow.Delete
iCntr = iCntr – 1
Loop
‘itt befejezzük az aleljárást.
End Sub

Itt megfigyelhetjük, hogy az utolsó soroktól az elejéig végigmegyünk a sorokon. Ez lesz a pontos kód, miközben töröljük a sorokat a munkalapról. A sorokat mindig az utolsótól az elsőig töröljük.