Свойство Application.PreviousSelections (Excel)

Возвращает массив последних четырех выбранных диапазонов или имен. Каждый элемент в массиве является объектом Range . Только для чтения, Variant.

Синтаксис

выражение. PreviousSelections (индекс)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Индекс;	Необязательный	Variant	Порядковый номер (от 1 до 4) предыдущего диапазона или имени.

Примечания

Каждый раз, когда вы переходите к диапазону или ячейке с помощью поля "Имя " или команды "Перейти к " (меню "Правка "), или каждый раз, когда макрос вызывает метод Goto , предыдущий диапазон добавляется в этот массив как элемент номер 1, а остальные элементы массива перемещаются вниз.

Пример

В этом примере отображаются адреса ячеек всех элементов в массиве предыдущих выборок. Если предыдущие выборки отсутствуют, функция LBound возвращает ошибку. Эта ошибка перехватывается, и появляется окно сообщения.

On Error GoTo noSelections 
For i = LBound(Application.PreviousSelections) To _ 
 UBound(Application.PreviousSelections) 
 MsgBox Application.PreviousSelections(i).Address 
Next i 
Exit Sub 
On Error GoTo 0 
 
noSelections: 
 MsgBox "There are no previous selections"

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

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