Suppression MFC via un bouton ou clic dans la cellule ?

Bonjour,

Je me demandais si il était possible de désactiver une MFC via un simple clic dans une cellule ou, via une case à cocher ou, en sélectionnant des cellules puis via un bouton lié à une macro ?

Merci.

Bonsoir Arnaud91

Un code à insérer dans un module

Sub Efface_MFC()
'
' Efface_MFC Macro
'

'
    ActiveCell.Select
    ActiveCell.FormulaR1C1 = ""
    ActiveCell.Range("A1:A9").Select  ' zone de MFC
    Selection.FormatConditions.Delete
    ActiveCell.Select
End Sub

Amicalement

Pierrot

Bonsoir,

Merci Pierre,

Je viens de tester dans mon classeur et la macro supprime le contenu de la ou les cellules sélectionnées (et non pas uniquement la MFC), est-ce normal ou je m'y prend mal ?

Merci.

Bonsoir Arnaud,

un fichier exemple avec un double-clic qui supprime la MFC

Amicalement

Pierrot

Merci beaucoup Pierre,

Je vais regarder ça en détail tout à l'heure.

Bonjour Pierre,

Je viens de tester votre documents et le double clic efface à la fois la MFC et son contenu.

Y a t'il une manipulation supplémentaire à faire pour effacer uniquement la MFC.

J'ai donc tenté d'intégrer votre macro dans mon document original et l'effacement au double clic ne fonctionne pas (sans aucun doute dut à ma méconnaissance), j'ai donc ajouté un bouton et affecté la macro et celle-ci efface la MFC ainsi que le contenu.

Tout a été testé sur Excel Mac et Pc.

Merci pour votre aide.

Bonjour Arnaud91

Voici le code modifié

Sub Efface_MFC()
    '
    ' Efface_MFC Macro
    '

    '
       ActiveCell.Select
        ActiveCell.Range("A1:A9").Select  ' zone de MFC
       Selection.FormatConditions.Delete
        ActiveCell.Select
    End Sub

Amicalement

Pierrot

Merci Pierre,

je n'arrive pas à faire fonctionner la macro.

Je l'insère dans "module 1" via l'éditeur vba (je change la plage de cellules concernées), je ferme puis redémarre mon document mais rien ne se passe au double clic.

Y a t'il une manipulation particulière à faire ?

Merci.