Classe Top10 (Excel VBA)

La classe Top10 représente l’un des dix visuels supérieurs d’une règle conditionnelle de mise en forme.

Les procédures principales de la classe Top10 sont FormatConditions.Add, FormatConditions.AddAboveAverage, FormatConditions.AddColorScale, FormatConditions.AddDatabar, FormatConditions.AddIconSetCondition, FormatConditions.AddTop10, FormatConditions.AddUniqueValues, FormatConditions.Delete et Delete

Set

Pour utiliser une variable de classe Top10, elle doit d'abord être instanciée, par exemple

Dim tp1 as Top10
Set tp1 = ActiveCell.FormatConditions(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Top10 : Range.FormatConditions, FormatConditions.AddTop10, FormatConditions.AddTop10, FormatConditions.AddTop10, FormatConditions.AddTop10, FormatConditions.AddTop10, FormatConditions.AddTop10 et FormatConditions.AddTop10

For Each

Voici un exemple de traitement des éléments Top10 dans une collection

Dim tp1FormatCondition As Top10
For Each tp1FormatCondition In ActiveCell.FormatConditions
	
Next tp1FormatCondition

Thèmes

Les procédures suivantes de cette classe ont été regroupées et sont décrites sur une page thématique séparée

Add with its procedures FormatConditions.Add, FormatConditions.AddAboveAverage, FormatConditions.AddDatabar, FormatConditions.AddIconSetCondition et FormatConditions.AddTop10

Méthodes

Les méthodes principales de la classe Top10 sont

FormatConditions.AddColorScale - Cette méthode renvoie un nouvel objet ColorScale qui représente une règle de mise en forme conditionnelle qui utilise des dégradés dans les couleurs des cellules pour indiquer les différences relatives entre les valeurs des cellules incluses dans une plage sélectionnée.

Dim lngColorScaleType As Long: lngColorScaleType = 
Dim cseAddColorScale As ColorScale
Set cseAddColorScale = ActiveCell.FormatConditions.AddColorScale(ColorScaleType:=lngColorScaleType)

FormatConditions.AddUniqueValues - Renvoie un nouvel objet UniqueValues qui représente une règle de mise en forme conditionnelle pour la plage spécifiée.

Dim uvsAddUniqueValues As UniqueValues
Set uvsAddUniqueValues = ActiveCell.FormatConditions.AddUniqueValues()

FormatConditions.Delete - Cette méthode supprime l'objet.

ActiveCell.FormatConditions.Delete

Delete - Supprime l’objet de règle de mise en forme conditionnelle spécifié.

ActiveCell.FormatConditions(1).Delete

Autre Méthodes

FormatConditions.Item - Cette méthode renvoie un seul objet d'une collection.

ModifyAppliesToRange - Définit la plage de cellules à laquelle cette règle de mise en forme s’applique.

SetFirstPriority - Affecte la valeur 1 à la priorité de cette règle de mise en forme conditionnelle afin qu’elle soit évaluée avant toutes les autres règles de la feuille de calcul.

SetLastPriority - Définit l’ordre d’évaluation de cette règle de mise en forme conditionnelle de sorte qu’elle soit évaluée après toutes les autres règles de la feuille de calcul.

Propriétés

FormatConditions.Count Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveCell.FormatConditions.Count

FormatConditions.Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveCell.FormatConditions.Parent

AppliesTo Renvoie un objet Range qui spécifie la plage de cellules à laquelle la règle de mise en forme est appliquée.

Dim rngAppliesTo As Range
Set rngAppliesTo = ActiveCell.FormatConditions(1).AppliesTo

Borders Renvoie une collection Borders qui spécifie la mise en forme des bordures de cellule si la règle de mise en forme conditionnelle renvoie la valeur true. En lecture seule.

Dim brdsBorders As Borders
Set brdsBorders = ActiveCell.FormatConditions(1).Borders

CalcFor Cette propriété renvoie ou définit l’une des constantes de l’énumération XlCalcFor , qui spécifie comment le format conditionnel dans un rapport de tableau croisé dynamique doit être évalué.

ActiveCell.FormatConditions(1).CalcFor = xlAllValues

Font Renvoie un objet font qui spécifie la mise en forme de caractères si la règle de mise en forme conditionnelle renvoie la valeur true. En lecture seule.

Dim fntFont As Font
Set fntFont = ActiveCell.FormatConditions(1).Font

Interior Renvoie un objet Interior qui spécifie les attributs de l’intérieur d’une cellule pour une règle de mise en forme conditionnelle qui donne la valeur true. En lecture seule.

Dim intInterior As Interior
Set intInterior = ActiveCell.FormatConditions(1).Interior

NumberFormat Renvoie ou définit le format numérique appliqué à une cellule si la règle de mise en forme conditionnelle renvoie True. Variant en lecture/écriture.

ActiveCell.FormatConditions(1).NumberFormat =

Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveCell.FormatConditions(1).Parent

Percent Renvoie ou définit une valeur de type Boolean qui indique si le rang est déterminé par un pourcentage.

ActiveCell.FormatConditions(1).Percent = True

Priority Renvoie ou définit la valeur de priorité de la règle de mise en forme conditionnelle. La priorité détermine l’ordre d’évaluation lorsque plusieurs règles de mise en forme conditionnelle existent dans une feuille de calcul.

ActiveCell.FormatConditions(1).Priority =

PTCondition Renvoie une valeur de type Boolean indiquant si le format conditionnel est appliqué à un tableau croisé dynamique. En lecture seule.

Dim booPTCondition As Boolean
booPTCondition = ActiveCell.FormatConditions(1).PTCondition

Rank Cette propriété renvoie ou définit une valeur de type long , spécifiant le nombre ou le pourcentage de la valeur de classement de la règle de mise en forme conditionnelle.

ActiveCell.FormatConditions(1).Rank =

ScopeType Cette propriété renvoie ou définit l’une des constantes de l’énumération XlPivotConditionScope , qui détermine l’étendue du format conditionnel lorsqu’il est appliqué à un tableau croisé dynamique.

ActiveCell.FormatConditions(1).ScopeType = xlDataFieldScope

StopIfTrue Renvoie ou définit une valeur de type Boolean qui détermine si les autres règles de mise en forme conditionnelle de la cellule doivent être évaluées lorsque la règle active renvoie la valeur True.

ActiveCell.FormatConditions(1).StopIfTrue = True

TopBottom Cette propriété renvoie ou définit l’une des constantes de l’énumération XlTopBottom , qui détermine si le classement est évalué à partir du haut ou du bas.

ActiveCell.FormatConditions(1).TopBottom = xlTop10Bottom

Type Renvoie l’une des constantes de l’énumération XlFormatConditionType , qui spécifie le type de mise en forme conditionnelle. En lecture seule.

Dim xlfcType As XlFormatConditionType
xlfcType = ActiveCell.FormatConditions(1).Type