Внутренний объект (Excel)
Представляет внутреннюю часть объекта.
Пример
Используйте свойство Interior объекта Range , чтобы вернуть объект Interior . В следующем примере для внутренней части ячейки A1 задается красный цвет.
Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 3
В этом примере возвращается значение цвета ячейки в столбце A с помощью свойства ColorIndex , а затем используется это значение для сортировки диапазона по цвету.
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
Свойства
- Application
- Color
- ColorIndex
- Creator
- Gradient
- InvertIfNegative
- Parent
- Pattern
- PatternColor
- PatternColorIndex
- PatternThemeColor
- PatternTintAndShade
- ThemeColor
- TintAndShade
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.