Valeurs des Lignes - Rows

Bonjour

Pour ne pas répéter une même action environ 4000 fois, je cherche à supprimer 4 lignes sur 5, à intervalle régulier.

Pour ce faire, je met en place une boucle, allant de la ligne où je débute, qui sélectionne donc la ligne + les 3 lignes suivantes (donc un lot de 4 lignes) que je supprime, et rebelote à la ligne suivante.

Une image de ma maccro :

Sub test()

End Sub

Mon problème consiste en la dénomination des lignes dans ma boucle :

Rows("i:j").Select

-> Cela ne marche pas, puisque ce sont des caractères alphabétiques.

Il faudrait que je fasse :

Rows("23:26").Select

-> Ça marche puisque ce sont des valeurs numériques. Cependant, en entrant une valeur numérique, je ne peux plus incrémenter les valeurs qui sont dedans dans la boucle.

Ma question est : Comment sélectionner des lignes à l'aide de caractère alphabétiques et non numériques?

Merci d'avance !

EDIT :

Quel abruti suis-je, j'ai trouvé la solution dans une autre question sur le forum...

https://forum.excel-pratique.com/viewtopic.php?f=2&t=43962

La réponse à ma question est de faire :

Rows(i & ":" & j).Select

Et non Rows("i:j").Select

Une image de cette macro corrigée :

Sub test()

End Sub

Merci au topic cité

Rechercher des sujets similaires à "valeurs lignes rows"