ERLANDSEN DATA CONSULTING Excel & VBA Tips   Information in English / Informasjon på engelsk

Disse websidene oppdateres ikke lengre og er kun tilgjengelig for historikken sin skyld.

Klikk her for å gå til den oppdaterte informasjonen.

Statuslinjen

Dersom du slår av skjermoppdateringen og utførelsen av makroene tar lang tid, kan brukeren tro at maskinen har sluttet å reagere. Derfor er det en god programmeringsskikk å gi brukeren en tilbakemelding på statuslinjen om at makroen arbeider. Her er et eksempel :

Sub StatuslinjeEksempel()
    Application.ScreenUpdating = False ' slår av skjermoppdateringen
    Application.DisplayStatusBar = True ' sørger for at statuslinjen vises
    Application.StatusBar = "Vent litt mens oppgave 1 utføres..."
    ' her kan du legge til kode for oppgave 1 i stedet for neste linje
    Application.Wait Now + TimeValue("00:00:02")
    Application.StatusBar = "Vent litt mens oppgave 2 utføres..."
    ' her kan du legge til kode for oppgave 2 i stedet for neste linje
    Application.Wait Now + TimeValue("00:00:02")
    Application.StatusBar = False ' frigir statuslinjen til programmet
End Sub

Dersom du ønsker enda mer kontroll over statuslinjen slik at du kan vise en progresjonslinje slik som den Excel selv benytter kan du finne et eksempel på dette her: Excel Files For Devlopers

 

Dokumentet er sist oppdatert 2002-07-17 12:31:02      Utskriftsvennlig versjon

 

Erlandsen Data Consulting     http://www.erlandsendata.no/   
Excel & VBA Tips   Copyright ©1999-2017    Ole P. Erlandsen   All rights reserved
E-post kontaktadresse