Classe UniqueValues (Excel VBA)

L'objet UniqueValues utilise la propriété DupeUnique pour renvoyer ou définir une énumération qui détermine si la règle doit rechercher les valeurs en double ou uniques dans la plage.

Les procédures principales de la classe UniqueValues 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 UniqueValues, elle doit d'abord être instanciée, par exemple

Dim uvs as UniqueValues
Set uvs = ActiveCell.FormatConditions(Index:=1)

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

For Each

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

Dim uvsFormatCondition As UniqueValues
For Each uvsFormatCondition In ActiveCell.FormatConditions
	
Next uvsFormatCondition

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 UniqueValues 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

DupeUnique Cette propriété renvoie ou définit l’une des constantes de l’énumération XlDupeUnique , qui spécifie si la règle de mise en forme conditionnelle recherche des valeurs uniques ou en double.

ActiveCell.FormatConditions(1).DupeUnique = xlDuplicate

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

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

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

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