Iclaroc, benvenuto.
Ti invito a leggere il regolamento del forum con particolare attenzione alla sezione riguardante i titoli: Leggi_Regolamento --> il linguaggio e la versione devo essere specificati prima di tutto nel titolo.
Grazie per la collaborazione
Riguardo al tuo quesito...
per avere il cursore a forma di clessidra devi scrivere:
mentre per farlo tornare normale:codice:Screen.Mousepointer = vbHourGlass
codice:Screen.Mousepointer = vbDefault