VBA suppression à plusieurs condition

Citation:

---

Envoyé par chloe74

je me suis tromper de macro haha non c'est bon c'est parfait ! il s'est exécuter en 16 min, c'est pile se que je voulais vraiment merci :)
bonne soirée

---

Super.

Si le tableau final vous convient alors vous pouvez le rebasculer sur la feuille1 en modifiant les 3 lignes

Code:

---

1 2 3 4 5 6

Sheets("Feuil3").Cells.Clear   Sheets("Feuil3").Range("A1:E1").Value = Sheets("Feuil1").Range("A1:E1").Value   Sheets("Feuil3").Range("A2:E" & index1_tablo_feuille1 + 1) = tablo_resultat()

---

en

Code:

---

1 2 3 4 5 6

'Sheets("Feuil3").Cells.Clear 'Sheets("Feuil3").Range("A1:E1").Value = Sheets("Feuil1").Range("A1:E1").Value Sheets("Feuil1").Range("A2:E" & index1_tablo_feuille1 + 1) = tablo_resultat()

---

Et n'oubliez pas de cliquez sur le pouce en dessous du message précédent pour valider la réponse.