Cambia l'aspetto del cursore in clessidra usando VBA in Microsoft Excel

Sommario

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.

Aiuterete lo sviluppo del sito, condividere la pagina con i tuoi amici

wave wave wave wave wave