Свойство Application.Selection (Excel)
Возвращает текущий выбранный объект на активном листе для объекта Application . Возвращает значение Nothing, если объекты не выбраны. Используйте метод Select , чтобы задать выделение, и используйте функцию TypeName для обнаружения выбранного типа объекта.
Синтаксис
expression. Выбор
выражение: переменная, представляющая объект Application.
Примечания
Возвращаемый тип объекта зависит от текущего выделения (например, если выбрана ячейка, это свойство возвращает объект Range ). Свойство Selection возвращает Значение Nothing, если ничего не выбрано.
Использование этого свойства без квалификатора объектов эквивалентно использованию Application.Selection.
Пример
В этом примере удаляется выделение на листе Sheet1 (при условии, что выделение представляет собой диапазон ячеек).
Worksheets("Sheet1").Activate
Selection.Clear
В этом примере отображается тип объекта Visual Basic выделенного фрагмента.
Worksheets("Sheet1").Activate
MsgBox "The selection object type is " & TypeName(Selection)
В этом примере отображаются сведения о текущем выделенном фрагменте.
Sub TestSelection( )
Dim str As String
Select Case TypeName(Selection)
Case "Nothing"
str = "No selection made."
Case "Range"
str = "You selected the range: " & Selection.Address
Case "Picture"
str = "You selected a picture."
Case Else
str = "You selected a " & TypeName(Selection) & "."
End Select
MsgBox str
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.