Dans cet article, nous allons apprendre à supprimer les lignes lorsqu’il n’y a pas de données dans la ligne entière.

Voici un aperçu des données dont nous disposons:

image 1

Le concept derrière ce didacticiel est que s’il existe une ligne vide complète dans la plage sélectionnée A1: E10, le code vba doit supprimer cette ligne.

Nous devons suivre les étapes ci-dessous:

Cliquez sur l’onglet Développeur Dans le groupe Code, sélectionnez Visual Basic

image 2

  • Entrez le code suivant dans le module de feuille de calcul actuel

Sous DeleteEntireRow ()

Dim i As Long

‘Le calcul et la mise à jour d’écran sont désactivés pour accélérer la macro

Avec application

.Calculation = xlCalculationManual

.ScreenUpdating = Faux

Pour i = Selection.Rows.Count To 1 Step -1

Si WorksheetFunction.CountA (Selection.Rows (i)) = 0 Then

Selection.Rows (i) .EntireRow.Delete

Fin si

Suivant i

.Calculation = xlCalculationAutomatic

.ScreenUpdating = Vrai

Terminer par

End Sub

image 3

  • Supprimons d’abord manuellement les données d’affilée pour tester notre code.

  • Après avoir copié le code; sélectionnez la plage A1: E10 et supprimez manuellement n’importe quelle ligne

image 4

  • Maintenant, exécutez la macro en utilisant la touche ALT + F8 et sélectionnez DeleteEntireRow

image 5

  • La ligne vide a été supprimée et toutes les lignes ci-dessous sont décalées vers le haut.

De cette façon, nous pouvons supprimer des lignes en utilisant vba dans Microsoft Excel.

Excel//wp-content/uploads/2015/06/Download-Delete-Rows-in-VBA1.xlsm[Download-Delete Rows in VBA]