Поделиться через


Внутренний объект (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

Свойства

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.