J'ai trouvé un thread where the conditional formatting is removed but the format is kept. Si j'exécute le script, je perds le formatage conditionnel des bordures. Est-il également possible de conserver toutes les informations sur la frontière?Excel VBA Supprimer Mise en forme conditionnelle garder les bordures
Best, Alex
A l'intérieur du bloc With aCell, vous pouvez essayer d'ajouter ceci:
Dim b as long
For b = 1 To 12
.Borders(b).LineStyle = .DisplayFormat.Borders(b).LineStyle
.Borders(b).Color = .DisplayFormat.Borders(b).Color
.Borders(b).Weight = .DisplayFormat.Borders(b).Weight
Next
P.S. J'ai utilisé des valeurs numériques pour l'énumération xlEdgeTop, xlEdgeLeft etc ..., pour raccourcir le code avec une boucle.