Objeto interior (Excel)
Representa o interior de um objeto.
Exemplo
Use a propriedade Interior do objeto Range para retornar o objeto Interior . O exemplo a seguir define como vermelho a cor do interior da célula A1.
Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 3
Este exemplo obtém o valor da cor de uma célula na coluna A usando a propriedade ColorIndex e, em seguida, usa esse valor para classificar o intervalo por cor.
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
Propriedades
- Application
- Color
- ColorIndex
- Creator
- Gradiente
- InvertIfNegative
- Parent
- Pattern
- PatternColor
- PatternColorIndex
- PatternThemeColor
- PatternTintAndShade
- ThemeColor
- TintAndShade
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.