Si vous voulez un moyen de supprimer tous les numéros de lignes similaires d’un coup, cet article est pour vous.

Dans cet article, nous allons apprendre comment nous pouvons nous débarrasser de la même ligne dans plusieurs feuilles de calcul via des macros.

===

Question): Je souhaite supprimer la même ligne dans plusieurs feuilles de calcul à l’aide du code VBA. Ce que je veux, c’est du code pour supprimer toutes les lignes du classeur quel que soit le nombre de feuilles présentes dans le fichier actuel; Je veux supprimer le numéro de ligne sélectionné de toutes les 5 feuilles.

Tout d’abord, saisissons les données similaires dans toutes les feuilles de calcul du même emplacement

image 1

Nous devons suivre les étapes ci-dessous:

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

image 2

Saisissez le code suivant dans le module standard: –

Sous DeleteRows ()

Dim shtArr, i As Long, xx As Long

shtArr = Array (« Feuille1 », « Feuille2 », « Feuille3 », « Feuille4 », « Feuille5 »)

xx = Selection.Row

For i = LBound (shtArr) To UBound (shtArr)

Feuilles (shtArr (i)). Rows (xx) .EntireRow.Delete

Suivant i

End Sub

===

image 3

  • Placez maintenant le curseur sur n’importe quelle cellule A1 & sur Sheet1.

Appuyez sur ALT + F8 * pour exécuter la macro; vous trouverez que le numéro de ligne sélectionné est supprimé dans toutes les feuilles.

  • L’instantané suivant montre les données de la feuille 1 et de la feuille 2 à titre d’exemple; lorsque vous exécutez cet exercice, vous trouverez une solution similaire dans toutes les feuilles respectives.