mNouveau venumth_26Inscrit le :24/01/2019Dernière activité :28/01/2019 à 21:02Version d'Excel :2013Messages4Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Sujets créés par mth_26DateForumSujetExtrait du message24/01/2019 à 20:54Excel - VBAOptimisation/modif codeJ'aimerais optimiser le code ci-dessous. Je souhaite supprimer toutes les lignes qui ne répondent pas au critère filtré et jusqu'à la dernière ligne non vide. Voici mon code: With ActiveWorkbook.Sheets("Cat. Méth. NCPF") For i = .Range("A" & .Rows.Count).End(xlUp).Row To 9 Step -1 If .Range("A" & i)...Forums