afficher les règles de MFC d'une feuille excel 2003

[alain29100]

Je m'embrouille un peu dans les MFC d'une feuille excel sur 2003 et je voudrais voir toutes les règles qui sont définies dans la feuille. Je ne vois pas comme sur 2010 d'option pour visualiser ces règles.
Merci pour votre aide
Alain

 

[CB60]

Re : afficher les règles de MFC d'une feuille excel 2003

Bonjour
Michelxld m'avait fais cela, il y a quelques années.

Option Explicit

Sub essaimefc()
'MichelXld
Dim Fc As FormatCondition
Dim Operator As String, Resultat As String
Dim Cell As Range

For Each Cell In ActiveSheet.Cells.SpecialCells(xlCellTypeAllFormatConditions)
For Each Fc In Cell.FormatConditions
Resultat = Fc.Formula1

Select Case Fc.Formula1 'Operator
Case xlBetween
Operator = "est Comprise entre "
Resultat = Resultat & " et " & Fc.Formula2
Case xlEqual: Operator = "est égal à "
Case xlGreater: Operator = "est supérieur à "
Case xlGreaterEqual: Operator = "est supérieur ou égal à "
Case xlLess: Operator = "est inférieur à"
Case xlLessEqual: Operator = "est inférieur ou égal à "
Case xlNotBetween
Operator = "est non comprise entre"
Resultat = Resultat & " et " & Fc.Formula2
Case xlNotEqual: Operator = "est différent de "
End Select

MsgBox "Cellule: " & Cell.Address & " " & Operator & " " & Resultat
Next Fc
Next Cell
End Sub

 

[alain29100]

Re : afficher les règles de MFC d'une feuille excel 2003

Oups ! Désolé, mon niveau Excel est proche de zéro et j'avoue être perplexe devant le code. Je suppose que c'est du VB. Comment je l'utilise ?

 

[CB60]

Re : afficher les règles de MFC d'une feuille excel 2003

re
il te suffit de copier ce code,
de faire un click droit sur l'onglet d'une feuille,
visualiser le code,
Vba s'ouvre,
dans le bandeau en haut,
insertion
module
et coller cela dans la feuille qui vient de s'ouvrir.
Ensuite il te suffit de te mettre sur une feuille et de lancer la macro, elle t'indiquera cellule apres cellule les MEFC qui existe sur cette feuille grace a une message box

 

[alain29100]

Re : afficher les règles de MFC d'une feuille excel 2003

Apparemment il y a une erreur de compil


Voir PJ

 

[Celeda]

Re : afficher les règles de MFC d'une feuille excel 2003

Bonjour,

Il n'y a pas d'erreur de compil : il faut enlever l'espace à la ligne :
For Each Cell In ActiveSheet.Cells.SpecialCells(xlCellTypeAllFormat Conditions)


Super Bruno pour cette macro ce qui est un peu embêtant est l'affichage de la message box pour toutes les lignes!!! Par contre cela aurait été interessant d'avoir toutes les mfc de toutes les lignes en recopie sur une autre feuille.

 

[CB60]

Re : afficher les règles de MFC d'une feuille excel 2003

bonjour Celeda
Content de te retrouver, oui j'ai aussi cette macro, qui retranscrit sur une feuille un état des mises en forme conditionnelle, mais je ne l'ai pas proposé, manque d'information, la le fais d'avoir une msgbox permet de voir sans risquer une modif d'un fichier.
Si tu le souhaite je peux la remettre sur le fil

 

[Celeda]

Re : afficher les règles de MFC d'une feuille excel 2003

Bonjour,

vi, replace la svp monsieur.

Merci Bruno.

 

[alain29100]

Re : afficher les règles de MFC d'une feuille excel 2003

Désolé, en plus d'être nul je suis bigleu. Je vois pas l'espace à retirer sur la ligne.
Je suis aussi preneur de la macro

Merci encore à vous deux

 

[CB60]

Re : afficher les règles de MFC d'une feuille excel 2003

re
voici le fichier, il suffit de faire un click sur le bouton

 

[alain29100]

Re : afficher les règles de MFC d'une feuille excel 2003

Merci j'essaierai ce soir de chez moi. Peux pas télécharger l'outil (secu boulot !). Je suis en excel 2010 chez moi, j'espère que ce sera bon quand même !

Merci encore

 

[Celeda]

Re : afficher les règles de MFC d'une feuille excel 2003

Bonjour,

Merci Bruno.

J'ai un arrêt sur macro à la ligne :
Select Case Fc.Operator
?????

 

[alain29100]

Re : afficher les règles de MFC d'une feuille excel 2003

Merci pour le fichier
Test hier soir chez moi (2007), idem

 

[CB60]

Re : afficher les règles de MFC d'une feuille excel 2003

Bonsoir
J'ai cherché un peu la formulation pour excel 2007 mais je n'ai pas trouvé!
Je continue les recherches et si je trouve je remettrais le fichier.