Quando si dispone di una macro/codice vba di grandi dimensioni che deve essere eseguita per molti minuti, è possibile modificare il cursore nella clessidra o nel cursore di attesa (in base alle impostazioni di sistema) per il periodo in cui la macro è in esecuzione. Una volta completata la macro, il cursore può essere riportato al cursore predefinito.
Questo è un codice di esempio che mostra come modificare il cursore.
Opzione esplicita
Sottomacro1()
Application.Cursor = xlWait
'Codice qui
Application.Cursor = xlDefault Fine sottotitolo
- Dopo le istruzioni dim (questo codice di esempio non ne ha ancora), impostiamo Application.Cursor = xlWait all'inizio del codice.
- Quindi puoi includere qualsiasi codice necessario per l'esecuzione. Se hai bisogno di chiamare più sub/procedure, puoi farlo qui o semplicemente inserire l'intero codice qui.
- Quindi, appena prima dell'istruzione End Sub, è necessario ripristinare il cursore sul valore predefinito. Lo facciamo usando la linea Application.Cursor = xlDefault
- Puoi includere tutte le altre affermazioni di cui hai bisogno come Application.ScreenUpdating = FalseoApplication.DisplayAlerts = Falseinsieme con il Applicazione.Cursore = xlWaitdichiarazione. Allo stesso modo, puoi includere Application.ScreenUpdating = Vero o Application.DisplayAlerts = True insieme con il Application.Cursor = xlDefaultdichiarazione.
- Per copiare questo codice, premi i tasti Alt + F11 sulla tastiera. Questo aprirà il modulo del codice. Sul lato sinistro vedrai gli oggetti di Microsoft Excel. Fare clic con il tasto destro e selezionare Inserisci, quindi selezionare Modulo. Copia il codice nella finestra del codice a destra.