Remarque
L’accès à cette page requiert une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page requiert une autorisation. Vous pouvez essayer de modifier des répertoires.
Renvoie un objet DisplayFormat qui représente les paramètres d’affichage de la plage spécifiée. En lecture seule.
Syntaxe
expression. DisplayFormat
expression Variable représentant un objet Range.
Valeur renvoyée
DisplayFormat
Remarques
DisplayFormat est affecté par la mise en forme conditionnelle, comme indiqué dans le code ci-dessous. Elle ajoute une mise en forme conditionnelle à la cellule A1 sur la feuille active. Cette mise en forme met la cellule en gras, remplace la couleur intérieure par rouge et ajoute un motif en damier.
Public Sub DemonstrateConditionalFormattingAffectsDisplayFormat()
Dim inputArea As Range
Set inputArea = ActiveSheet.Range("A1")
Dim addedFormatCondition As FormatCondition
Set addedFormatCondition = inputArea.FormatConditions.Add(xlExpression, Formula1:="=true")
addedFormatCondition.Font.Bold = True
addedFormatCondition.Interior.Color = XlRgbColor.rgbRed
addedFormatCondition.Interior.Pattern = XlPattern.xlPatternChecker
Debug.Print inputArea.Font.Bold 'False
Debug.Print inputArea.Interior.Color 'XlRgbColor.rgbWhite
Debug.Print inputArea.Interior.Pattern 'XlPattern.xlPatternNone
Debug.Print inputArea.DisplayFormat.Font.Bold 'True
Debug.Print inputArea.DisplayFormat.Interior.Color 'XlRgbColor.rgbRed
Debug.Print inputArea.DisplayFormat.Interior.Pattern 'XlPattern.xlPatternChecker
End Sub
Notez que la propriété DisplayFormat ne fonctionne pas dans les fonctions définies par l’utilisateur (UDF). Par exemple, sur une fonction de feuille de calcul qui renvoie la couleur intérieure d’une cellule, vous utilisez une ligne similaire à : Range(n).DisplayFormat.Interior.ColorIndex. Lorsque la fonction de feuille de calcul s’exécute, elle renvoie une erreur #VALUE ! .
Dans un autre exemple, vous ne pouvez pas utiliser la propriété DisplayFormat dans une fonction de feuille de calcul pour renvoyer les paramètres d’une plage particulière. DisplayFormat fonctionnera toutefois dans une fonction appelée à partir de Visual Basic pour Applications (VBA). Par exemple, dans la FDU suivante :
Function getDisplayedColorIndex()
getColorIndex = ActiveCell.DisplayFormat.Interior.ColorIndex
End Function
L’appel de la fonction à partir d’une feuille de calcul comme suit =getDisplayedColorIndex() renvoie l’erreur #VALUE ! . Par conséquent, si une mise en forme conditionnelle est appliquée à une plage, il n’existe aucun moyen de renvoyer cette valeur avec une FDU. Si la mise en forme conditionnelle a été appliquée, obtenez l’index de couleur de la cellule active en appelant le volet Exécution dans l’éditeur Visual Basic.
Si aucune mise en forme conditionnelle n’est appliquée, utilisez la fonction ci-dessous pour renvoyer l’index de couleur de la cellule active. La fonction suivante fonctionne soit à partir d’une feuille de calcul, soit à partir de VBA.
Function getAppliedColorIndex()
getColorIndex = ActiveCell.Interior.ColorIndex
End Function
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.