Changing the cursor

[Robin Clay]

Greetings !

Some of my spreadsheets take a while to calculate, so I
have the facility to calculate just the selection.

The routine to do that currently puts "Re-calculating,
please wait..." into the StatusBar, which is then re-set
when the calculation is finished.

How can I also change the cursor for the duration, from
the usual cross to the hour-glass, and then back again ?

 

[Ron de Bruin]

Try this

Application.Cursor = xlWait
For the hourglass

Application.Cursor = xlDefault
To set it back to normal