Inhoudsopgave
Het is een belangrijk punt voor ons allen terwijl we werken met VBA in Excel, om de schermupdate uit te schakelen. In dit artikel laat ik u zien hoe u de schermupdate kunt uitschakelen met behulp van VBA in Excel.
Excel VBA: Schermupdate uitschakelen (Snelle weergave)
Sub Turn_Off_Screen_Update() Application.ScreenUpdating = False Count = 1 For i = 1 To 100 For j = 1 To 100 ActiveSheet.Cells(i, j) = Count = Count + 1 Next j Next i Application.ScreenUpdating = True End Sub
Download Praktijk Werkboek
Download dit oefenwerkboek om te oefenen terwijl u dit artikel leest.
Scherm uitschakelen Update.xlsmEen overzicht om schermupdate uit te schakelen met Excel VBA
Om het bijwerken van het scherm uit te schakelen met VBA is gemakkelijk. Om de waarheid te zeggen, slechts één regel is genoeg om dit te bereiken.
Application.ScreenUpdating = False
Deze ene regel code zal het updaten van het scherm voor u uitschakelen, maar u zult het effect niet kunnen voelen met deze ene regel. Om het te voelen, voegt u enkele regels code in die enkele taken voor u zullen uitvoeren na het updaten van het scherm. Het is beter als het een lange taak is, dat zal u het effect van het updaten van het scherm doen begrijpen.
Aantal = 1 Voor i = 1 tot 100 Voor j = 1 tot 100 ActiveSheet.Cells(i, j) = Aantal = Aantal + 1 Volgende j Volgende i
Deze regels voegen een reeks van 1 tot 100.000 in het actieve blad in, beginnend bij cel A1 Als je het doet zonder het scherm te updaten, zal het lang duren. Want elke keer dat het een getal toevoegt aan de volgende cel, wordt de vorige cel mee geupdate.
Maar als u het bijwerken van het scherm uit houdt, worden de eerdere cellen niet telkens bijgewerkt, en duurt het minder lang om de bewerking uit te voeren.
Dan kunt u desgewenst de schermupdate weer inschakelen.
Application.ScreenUpdating = True
Dus de volledige VBA code zal zijn:
⧭ VBA-code:
Sub Turn_Off_Screen_Update() Application.ScreenUpdating = False Count = 1 For i = 1 To 100 For j = 1 To 100 ActiveSheet.Cells(i, j) = Count = Count + 1 Next j Next i Application.ScreenUpdating = True End Sub
Lees meer: [Fixed!] Excel Cellen worden niet bijgewerkt tenzij dubbelklik (5 oplossingen)
Vergelijkbare lezingen
- Hoe Excel blad automatisch verversen (3 geschikte methoden)
- Een draaitabel automatisch bijwerken als de brongegevens veranderen
- Draaitabel niet verversen (5 problemen en oplossingen)
- Hoe automatisch draaitabel verversen zonder VBA in Excel (3 slimme methoden)
Macro ontwikkelen om schermupdate uit te schakelen met Excel VBA
We hebben de stapsgewijze analyse gezien van de code om schermupdate uit te schakelen met behulp van VBA in Excel. Nu zullen we zien hoe we een Macro om dit uit te voeren.
⧪ Stap 1: Het VBA-venster openen
Druk op ALT + F11 op uw toetsenbord om de Visual Basic raam.
⧪ Stap 2: Een nieuwe module invoegen
Ga naar Invoegen> Module in de werkbalk. Klik op Module Een nieuwe module genaamd Module1 (of iets anders, afhankelijk van je verleden) wordt geopend.
⧪ Stap 3: De VBA-code plaatsen
Dit is de belangrijkste stap. Voeg de gegeven VBA code in de module.
⧪ Stap 4: De code uitvoeren
Klik op de Run Sub \ UserForm in de werkbalk hierboven.
De code wordt uitgevoerd. En u zult zien dat een reeks getallen van 1 tot 1.00.000 snel op uw werkblad wordt gegenereerd, terwijl het anders lang zou duren voordat deze worden uitgevoerd.
Lees meer: [Opgelost]: Excel-formules worden niet bijgewerkt totdat ze worden opgeslagen (6 mogelijke oplossingen)
Dingen om te onthouden
U hoeft bij mij niet dezelfde taak uit te voeren na het uitschakelen van de schermupdate. U kunt doen wat uw gewone taak is. Maar het ding is dat u het effect van het uitschakelen van schermupdates niet zult begrijpen tenzij u een lange reeks taken uitvoert. Daarom heb ik een reeks gegenereerd van 1 tot 1.00.000.
Conclusie
Daarom is dit het proces om een Macro om het bijwerken van het scherm uit te schakelen met behulp van Excel VBA Heeft u vragen? Stel ze ons gerust. En vergeet niet onze site te bezoeken ExcelWIKI voor meer berichten en updates.