WerkbladFunctie | Schermupdate | DisplayAlerts | Berekening
De moeder van alle objecten is Excel zelf. We noemen het de Toepassingsobject. Het toepassingsobject geeft toegang tot veel Excel-gerelateerde opties.
WerkbladFunctie
U kunt de eigenschap WorksheetFunction gebruiken in Excel VBA om toegang te krijgen tot Excel-functies.
1. Plaats bijvoorbeeld een opdrachtknop op uw werkblad en voeg de volgende coderegel toe:
Bereik ("A3"). Waarde = Toepassing. WerkbladFunctie. Gemiddeld (Bereik ("A1: A2"))
Wanneer u op de opdrachtknop op het werkblad klikt, berekent Excel VBA het gemiddelde van de waarden in cel A1 en cel A2 en plaatst het resultaat in cel A3.
Opmerking: gebruik in plaats van Application.WorksheetFunction.Average gewoon WorksheetFunction.Average. Als u naar de formulebalk kijkt, ziet u dat de formule zelf niet in cel A3 is ingevoegd. Gebruik de volgende coderegel om de formule zelf in cel A3 in te voegen:
Bereik ("A3"). Waarde = "= GEMIDDELDE (A1:A2)"
Scherm Updaten
Soms vindt u het misschien handig om het bijwerken van het scherm uit te schakelen (om flikkeren te voorkomen) tijdens het uitvoeren van code. Als gevolg hiervan zal uw code sneller worden uitgevoerd.
1. Plaats bijvoorbeeld een opdrachtknop op uw werkblad en voeg de volgende coderegels toe:
Dim ik als geheel getal
Voor ik = 1 tot 10000
Bereik ("A1"). Waarde = i
volgende i
Wanneer u op de opdrachtknop op het werkblad klikt, geeft Excel VBA elke waarde een kleine fractie van een seconde weer en dit kan enige tijd duren.
2. Om het proces te versnellen, werkt u de code als volgt bij.
Dim ik als geheel getal
Application.ScreenUpdating = False
Voor ik = 1 tot 10000
Bereik ("A1"). Waarde = i
volgende i
Application.ScreenUpdating = True
Hierdoor zal je code veel sneller lopen en zie je alleen het eindresultaat (10000).
Waarschuwingen weergeven
U kunt Excel VBA instrueren om geen waarschuwingen weer te geven tijdens het uitvoeren van code.
1. Plaats bijvoorbeeld een opdrachtknop op uw werkblad en voeg de volgende coderegel toe:
ActiveWorkbook.Sluiten
Wanneer u op de opdrachtknop op het werkblad klikt, sluit Excel VBA uw Excel-bestand en wordt u gevraagd de aangebrachte wijzigingen op te slaan.
2. Als u Excel VBA wilt instrueren om deze waarschuwing niet weer te geven tijdens het uitvoeren van code, werkt u de code als volgt bij.
Application.DisplayAlerts = False
ActiveWorkbook.Sluiten
Application.DisplayAlerts = True
Als gevolg hiervan sluit Excel VBA uw Excel-bestand af, zonder u te vragen de aangebrachte wijzigingen op te slaan. Eventuele wijzigingen gaan verloren.
Berekening
Standaard is de berekening ingesteld op automatisch. Als gevolg hiervan berekent Excel de werkmap automatisch opnieuw telkens wanneer een waarde die van invloed is op een formule, verandert. Als uw werkmap veel complexe formules bevat, kunt u uw macro versnellen door de berekening in te stellen op handmatig.
1. Plaats bijvoorbeeld een opdrachtknop op uw werkblad en voeg de volgende coderegel toe:
Toepassing.Berekening = xlBerekeningHandmatig
Wanneer u op de opdrachtknop op het werkblad klikt, stelt Excel VBA de berekening in op handmatig.
2. U kunt dit controleren door op Bestand, Opties, Formules te klikken.
3. Als u nu de waarde van cel A1 wijzigt, wordt de waarde van cel B1 niet opnieuw berekend.
U kunt de werkmap handmatig opnieuw berekenen door op F9 te drukken.
4. In de meeste situaties stelt u de berekening aan het einde van uw code weer in op automatisch. Voeg eenvoudig de volgende coderegel toe om dit te bereiken.
Toepassing.Berekening = xlBerekeningAutomatisch
