Objet Interior (Excel)
Cet objet représente l'intérieur d'un objet.
Exemple
Utilisez la propriété Interior de l’objet Range pour renvoyer l’objet Interior . L'exemple suivant montre comment remplir la cellule A1 de couleur rouge.
Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 3
Cet exemple obtient la valeur de la couleur d’une cellule de la colonne A à l’aide de la propriété ColorIndex , puis utilise cette valeur pour trier la plage par couleur.
Sub ColorSort()
'Set up your variables and turn off screen updating.
Dim iCounter As Integer
Application.ScreenUpdating = False
'For each cell in column A, go through and place the color index value of the cell in column C.
For iCounter = 2 To 55
Cells(iCounter, 3) = _
Cells(iCounter, 1).Interior.ColorIndex
Next iCounter
'Sort the rows based on the data in column C
Range("C1") = "Index"
Columns("A:C").Sort key1:=Range("C2"), _
order1:=xlAscending, header:=xlYes
'Clear out the temporary sorting value in column C, and turn screen updating back on.
Columns(3).ClearContents
Application.ScreenUpdating = True
End Sub
Propriétés
- Application
- Color
- ColorIndex
- Creator
- Gradient
- InvertIfNegative
- Parent
- Pattern
- PatternColor
- PatternColorIndex
- PatternThemeColor
- PatternTintAndShade
- ThemeColor
- TintAndShade
Voir aussi
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour