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

Возвращает или задает внешний вид указателя мыши в Microsoft Excel. Чтение и запись XlMousePointer.

Синтаксис

expression. Курсор

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

Примечания

XlMousePointer может быть одной из следующих констант:

• xlDefault. Указатель по умолчанию.
• xlIBeam. Указатель I-beam.
• xlNorthwestArrow. Указатель на стрелку северо-запада.
• xlWait. Указатель на песочные часы.

Свойство Cursor не сбрасывается автоматически при остановке выполнения макроса. Перед остановкой выполнения макроса необходимо сбросить указатель на xlDefault .

Пример

В этом примере указатель мыши изменяется на I-beam, приостанавливает, а затем изменяет его на указатель по умолчанию.

Sub ChangeCursor() 
 
 Application.Cursor = xlIBeam 
 For x = 1 To 1000 
 For y = 1 to 1000 
 Next y 
 Next x 
 Application.Cursor = xlDefault 
 
End Sub

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

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