[VBA-E] Supprimer des lignes à partir d'une variable tableau

Bonjour,

J'ai une variable tableau (ArrayTitle) dans laquelle sont répertoriées les lignes de titre de chaque nouvelle série de mesure. Ces lignes doivent toutefois être effacées.
Si j'effectue une boucle du genre

Code:

---

1 2 3

'For Each j In ArrayTitle ' ActiveSheet.Rows(j).Delete 'Next j

---

la première ligne va être effacée, et va donc me décaler le reste de ma feuille excel, y compris les références aux lignes de titre. Je dois alors faire ma boucle de manière décrémentale, soit depuis la dernière ligne jusqu'à la première pour éviter ce désagrément.
Ma question est la suivante: est-ce qu'il n'y a pas une méthode qui permette de sélectionner directement toutes les lignes référencées dans ma variable tableau, sans passer par la boucle for?

Merci d'avance pour l'info, je continue de chercher...

Bonsoir à tous
Bonsoir humbp

Je ne sais pas de quelle manière tu initialises ton tableau avec les "lignes".
Ce que tu peux faire, c'est en même temps que tu "remplis" le tableau, tu crées une variable avec les lignes à supprimer comme ceci :

Code:

---

Var = "12:12,13:13"

---

puis pour supprimer les lignes, tu écris :

Code:

---

Range(Var).Delete

---

Eric

Au lieu de supprimer tes lignes au fur et à mesure, masque toutes les lignes, n'affiche que celles du tableau et supprime les lignes visibles.

Code:

---

1 2 3 4 5 6

Cells.EntireRow.Hidden = True For Each cell In ArrayTitle Cell.entirerow.Hidden = False Next Cells.SpecialCells(xlCellTypeVisible).Delete Shift:=xlUp Cells.EntireRow.Hidden = False

---

A+

Edit
A adapter avec Cells(letablo...)

@edelweisseric:
Merci pour l'info, je m'étais fixé sur l'utilisation d'un tableau. Par perfectionnisme peut-être, je trouve qu'une variable tableau est une solution plus élégante... mais pas forcément plus efficace!
:king:

@ouskel'n'or:
Ingénieuse astuce en effet! Et la boucle for ne doit pas être un soucis d'efficacité (vu le nombre limité de valeurs dans le tableau). Merci à toi aussi!
:king: