Innehållsförteckning
När du har ett stort vba -makro / kod som måste köras i många minuter kan du ändra markören till timglaset eller väntande markör (baserat på din systeminställning) för perioden när makrot körs. När makrot är klart kan markören återställas till standardmarkören.
Detta är en exempelkod som visar hur du kan ändra markören.
Alternativ Explicit
Undermakro1 ()
Application.Cursor = xlWait
’Kod här
Application.Cursor = xlDefault Avsluta Sub
- Efter de svaga påståendena (den här provkoden har inte några ännu), ställer vi in Application.Cursor = xlWait i början av koden.
- Sedan kan du inkludera vilken kod du behöver för att köra. Om du behöver ringa flera subs / procedurer kan du göra det här eller bara ha hela kodinmatningen här.
- Sedan strax innan Slut Sub -satsen måste du återställa markören till standard. Vi gör detta med hjälp av linjen Application.Cursor = xlDefault
- Du kan inkludera alla andra uttalanden du behöver Application.ScreenUpdating = FalsktellerApplication.DisplayAlerts = Falskttillsammans med Application.Cursor = xlWaitpåstående. På samma sätt kan du inkludera Application.ScreenUpdating = True eller Application.DisplayAlerts = True tillsammans med Application.Cursor = xlDefaultpåstående.
- För att kopiera den här koden, tryck på Alt + F11 -tangenterna på tangentbordet. Detta öppnar kodmodulen. På vänster sida ser du Microsoft Excel -objekt. Högerklicka och välj Infoga och välj sedan Modul. Kopiera koden till kodfönstret till höger.
