Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Anton от 21 апреля 2017, 08:04

Название: Excel Макрос: Как проверить, выделены ли на листе 2 или более ячеек?
Отправлено: Anton от 21 апреля 2017, 08:04
Подскажите пожалуйста, как определить с помощью макроса, что на листе выделено 2 или более ячеек?
Название: Re: Excel Макрос: Как проверить, выделены ли на листе 2 или более ячеек?
Отправлено: Администратор от 21 апреля 2017, 08:10
Sub Макрос()
    If Selection.Cells.CountLarge > 1 Then
        MsgBox "Выделено несколько ячеек.", vbInformation
    Else
        MsgBox "Выделена одна ячейка.", vbInformation
    End If
End Sub

PS. CountLarge появилось в "Excel 2007". Начиная с этой версии на листе очень много ячеек и прежнее свойство "Count" не работает, если макрос обращается к большому кол-ву ячеек.
Название: Re: Excel Макрос: Как проверить, выделены ли на листе 2 или более ячеек?
Отправлено: Anton от 21 апреля 2017, 08:23
То, что надо! Большое спасибо!