Bonjour le forum,
Je suis à la recherche d'une ligne de commande VBA qui me permettrait de supprimer les valeurs des cellules non coloriées (sans fond) dans une plage de donnée (A1:V80).
Avez vous une solution ?
Par avance merci,
Bonne journée à tous
Sub effacer()
For Each cellule In Range("A1:V80")
If cellule.Interior.ColorIndex = xlNone Then cellule.Value = ""
Next cellule
End Sub
Remarque: ça ne fonctionnera pas si la coloration des cellules est issue d'une MFC
Dans ce cas il faudra utiliser la condition de la MFC dans la ligne qui efface les cellules.
Remarque: ça ne fonctionnera pas si la coloration des cellules est issue d'une MFC
Dans ce cas il faudra utiliser la condition de la MFC dans la ligne qui efface les cellules.