Supprimer les lignes dans différentes feuilles par VBA
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
Nous devons suivre les étapes ci-dessous:
Cliquez sur l’onglet Développeur Dans le groupe Code, sélectionnez Visual Basic
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
===
-
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.