Effacer contenu de cellules (couleur) Le 30/06/2022 à 09:23bbenoistMembre fidèleMessages373Excel2007Inscrit08/10/2014 Bonjour,je voudrais une macro pour effacer le contenu des cellules en jaune,ou autre couleur.merci de votre réponse 6essai-2.xlsx (8.72 Ko) Le 30/06/2022 à 09:36XmenplPassionné d'ExcelMessages5'525Fichiers1Excel2003 à 2013Tél.38'798Inscrit16/05/2018Bonjour,Sub Macro1() For Each cell In Sheets("Feuil1").Range("A:A") If cell.Interior.Color = 65535 Then cell.Value = "" cell.Interior.Color = xlNone End If Next cell End SubLe 30/06/2022 à 09:40fcyspm30Membre dévouéMessages879Excel365 FR INSIDERInscrit09/06/2016EmploiRetraitéBonjourPour enlever toute couleur:Sub effecerCouleur() Range("A:A").Interior.Color = xlNone End SubLe 30/06/2022 à 13:12bbenoistMembre fidèleMessages373Excel2007Inscrit08/10/2014 merci à vous, bonne journée !Rechercher des sujets similaires à "effacer contenu couleur"ForumsExcel - VBAEffacer contenu de cellules (couleur)