Supprimer une rangée entière en utilisant VBA – Code d’exemple de macro Excel

Le code VBA Excel pour supprimer une rangée entière exemple nous aidera à supprimer des rangées dans une feuille de calcul Excel. Nous pouvons utiliser la méthode Delete de Rows pour supprimer la rangée entière. Dans cet exemple, nous allons voir comment supprimer une ligne entière dans une feuille de calcul Excel en utilisant VBA. Le code de macro VBA Excel pour la macro de suppression de rangées entières devrait fonctionner pour toutes les versions de Microsoft Excel 2003, Excel 2007, Excel 2010 et Excel 2013.

Code VBA pour supprimer une rangée entière

Voici la syntaxe et l’exemple de code de macro VBA pour supprimer une rangée entière dans les feuilles de calcul excel. Cela vous aidera à savoir comment supprimer une ligne entière du classeur Excel en utilisant VBA.

VBA Supprimer une rangée entière : syntaxe

Voici la syntaxe de la macro VBA Supprimer une rangée entière et l’exemple de commande de macro VBA pour supprimer une rangée entière d’une feuille de calcul en utilisant VBA. Nous utilisons la méthode Delete de l’objet Rows de la feuille de calcul.


Rows(

).EntireRow.Delete


Here Row Number est votre numéro de ligne à supprimer. Et la méthode EntireRow.Delete va supprimer la rangée entière de la feuille de calcul Excel.

Supprimer la rangée entière en utilisant VBA : Exemples

Le code suivant de la macro Excel VBA de suppression de ligne entière consiste à supprimer une ligne entière de la feuille de calcul. Cette macro VBA de suppression de ligne entière supprimera la ligne que nous avons mentionnée dans le code.

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

Instructions pour exécuter le code de la macro VBA de suppression de ligne entière

Veuillez suivre les étapes ci-dessous pour exécuter la macro VBA de suppression de ligne entière.
Etape 1 : Ouvrez n’importe quel classeur Excel existant.
Étape 2 : Appuyez sur Alt+F11 – Cela ouvrira l’éditeur VBA.
Étape 3 : Insérez un module de code à partir du menu d’insertion ensuite.
Étape 4 : Copiez le code ci-dessus et collez dans le module de code qui ont inséré dans l’étape ci-dessus.
Étape 5 : entrez quelques données échantillons dans la ligne 1.
Etape 6 : maintenant, appuyez sur F5 pour exécuter le code.

Maintenant, vous pouvez observer que la ligne 1 entière est supprimée de la feuille de calcul.

Code VBA expliqué pour supprimer une ligne entière:

Démarrage du programme et de la sous procédure pour écrire le code VBA pour supprimer une ligne entière de la feuille.
Sub sbVBS_To_Delete_EntireRow_C()

‘Spécifier les lignes à supprimer et supprimer les lignes en utilisant la méthode EntireRow.Delete.
Rows(1).EntireRow.Delete

‘Terminer la sous procédure pour supprimer la ligne entière.
End Sub

Ici Rows(1) est pour dire à excel de supprimer la ligne 1 de la feuille de calcul. Et la méthode Delete supprimera la rangée entière de la feuille de calcul.

VBA pour supprimer la rangée entière dans Excel :

Si vous voulez supprimer les premières rangées dans excel, vous pouvez répéter la commande delete plusieurs fois. L’exemple de code de macro VBA delete entire row suivant vous montrera comment supprimer les 3 premières lignes de la feuille de calcul.

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

Dans cet exemple, vous pouvez voir que la commande delete est répétée 3 fois. Elle va d’abord supprimer la première ligne, lorsque nous supprimons la première ligne. La rangée suivante devient (2ème rangée) la première rangée. Donc, si vous supprimez la première ligne à nouveau. La rangée suivante (3ème rangée) devient la première rangée. Cela signifie que nous avons supprimé les trois premières lignes en utilisant VBA.

VBA pour supprimer une ligne entière dans Excel : code VBA expliqué

Voici l’explication du VBA supprimer une ligne entièreMacro pour supprimer les trois premières lignes dans Excel.

Démarrer la procédure pour écrire les commandes VBA pour supprimer les quelques (3) premières lignes.
Sub sbVBS_To_Delete_FirstFewRows_in_Excel_C()

‘La première ligne est supprimée
Rows(1).EntireRow.Delete
‘Maintenant la deuxième rangée devient la première rangée- encore une fois nous supprimons la première rangée.
Rows(1).EntireRow.Delete
‘Maintenant la troisième rangée devient la première rangée- encore une fois la commande delete supprime la première rangée.
Rows(1).EntireRow.Delete
‘Nous avons supprimé les 3 premières lignes, et terminons la sous procédure ici.
End Sub

VBA pour supprimer une ligne entière dans Excel : Utilisation de For Loop

Voici l’exemple de macro VBA pour supprimer les quelques premières lignes en utilisant For Loop. Cela permettra de supprimer les 10 premiers enregistrements en utilisant For loop en VBA.

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

VBA pour supprimer une ligne entière dans Excel : Utilisation de For Loop – Explication

Voici l’explication détaillée de la suppression de ligne en utilisant For Loop en VBA.

Démarrage de la sous procédure pour écrire une macro VBA pour supprimer des lignes en utilisant la boucle for VBA.
Sub sbVBS_To_Delete_EntireRow_For_Loop_C()
‘Déclarer la variable iCntr pour stocker les itérations de la boucle for.
Dim iCntr
‘parcourir les lignes en utilisant la boucle for, ici l’instruction step indique l’incrémentation de iCntr.
For iCntr = 1 To 10 Step 1
‘effacer la première ligne.
Rows(1).EntireRow.Delete
Next
‘Nous avons supprimé la première ligne 10 fois, ce qui signifie que nous avons supprimé les 10 premières lignes de la feuille excel en utilisant la boucle for et VBA.
End Sub

VBA pour supprimer une ligne entière dans Excel : Utilisation de la boucle Do while

Voici l’exemple de macro VBA de suppression de ligne entière pour supprimer les quelques premières lignes en utilisant la boucle Do while. Cela supprimera les 10 premiers enregistrements en utilisant la boucle For en VBA.

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 pour supprimer une ligne entière dans Excel : Utilisation de la boucle Do while – Explication

Voici l’explication de la macro VBA de suppression de ligne entière ci-dessus pour supprimer des lignes en utilisant la boucle Do while.

Démarrer la macro VBA pour supprimer les lignes en utilisant la boucle do while.
Sub sbVBS_To_Delete_EntireRow_Do_while_Loop()
‘Déclarer la variable stocker le dernier numéro de ligne et l’utiliser comme variable de compteur.
Dim iCntrtr
‘assigner la dernière valeur de ligne à iCntr.
iCntr = 10 ‘ Dernière ligne
‘En utilisant la boucle do while nous supprimons les lignes à partir de la dernière (10ème) ligne .
Do While iCntr >= 1
Rows(iCntr).EntireRow.Delete
iCntr = iCntr – 1
Loop
‘ending the sub procedure here.
End Sub

Ici, vous pouvez observer que nous bouclons sur les lignes de la dernière au début. Ce sera le code exact tout en supprimant les lignes de la feuille de calcul. Il faut toujours supprimer les lignes de la dernière à la première.