Bonjour,

Je veux recenser les formats conditionnels mis en place sur les cellules d'une feuille Excel via une macro.
J'arrive à retrouver le critère (formule) et le formatage du texte.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub AnalyserFormatConditionnel()
'
Dim intIdx As Integer
'
	Sheets("Feuil1").Activate
	Range("B4:B4").Select
	For intIdx = 1 To Selection.FormatConditions.Count
		With Selection.FormatConditions.Item(intIdx)
			msgbox(.Formula1)
		End With
		With Selection.FormatConditions.Item(intIdx).Font
			msgbox(.Background)
			msgbox(.Italic)
			msgbox(.Bold)
			msgbox(.Color)
			msgbox(.ColorIndex)
		End With
	Next intIdx
End Sub
Par contre, je ne sais pas comment trouver les variables qui indiquent à quelle plage le format s'applique.
Merci d'avance pour votre contribution