Excel VBA: Vypnutí aktualizace obrazovky

  • Sdílet Toto
Hugh West

Je to důležitá otázka pro nás všechny při práci s VBA v Excelu, abyste mohli vypnout aktualizaci obrazovky. V tomto článku vám ukážu, jak můžete vypnout aktualizaci obrazovky pomocí funkce VBA v aplikaci Excel.

Excel VBA: Vypnutí aktualizace obrazovky (rychlé zobrazení)

 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 = Count + 1 Next j Next i Application.ScreenUpdating = True End Sub 

Stáhnout cvičebnici

Stáhněte si tento cvičební sešit a procvičujte si při čtení tohoto článku.

Vypnout aktualizaci obrazovky.xlsm

Přehled vypnutí aktualizace obrazovky pomocí aplikace Excel VBA

Vypnutí aktualizace obrazovky pomocí VBA Popravdě řečeno, stačí k tomu jen jeden řádek.

 Application.ScreenUpdating = False 

Tento jeden řádek kódu za vás vypne aktualizaci obrazovky, ale s tímto jedním řádkem nebudete moci pocítit efekt. Abyste ho pocítili, vložte několik řádků kódu, které za vás po aktualizaci obrazovky provedou nějakou úlohu. Je lepší, když to bude dlouhá úloha, díky které pochopíte efekt aktualizace obrazovky.

 Count = 1 For i = 1 To 100 For j = 1 To 100 ActiveSheet.Cells(i, j) = Count Count = Count + 1 Next j Next i 

Tyto řádky vloží do aktivního listu řadu 1 až 100 000, počínaje buňkou A1 . Pokud to uděláte bez aktualizace obrazovky, bude to trvat dlouho. Protože při každém vložení čísla do další buňky se spolu s ním aktualizuje i předchozí buňka.

Pokud však necháte aktualizaci obrazovky vypnutou, nebudou se pokaždé aktualizovat dřívější buňky a provedení operace bude trvat kratší dobu.

Pokud si to přejete, můžete opět zapnout aktualizaci obrazovky.

 Application.ScreenUpdating = True 

Takže kompletní VBA kód bude:

Kód VBA:

 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 = Count + 1 Next j Next i Application.ScreenUpdating = True End Sub 

Přečtěte si více: [Opraveno!] Buňky aplikace Excel se neaktualizují, pokud není provedeno dvojkliknutí (5 řešení)

Podobná čtení

  • Jak automaticky obnovit list aplikace Excel (3 vhodné metody)
  • Jak automaticky aktualizovat tabulku Pivot při změně zdrojových dat
  • Neobnovení otočné tabulky (5 problémů & řešení)
  • Jak automaticky obnovit otočnou tabulku bez VBA v aplikaci Excel (3 chytré metody)

Vývoj makra pro vypnutí aktualizace obrazovky pomocí aplikace Excel VBA

Viděli jsme postupnou analýzu kódu pro vypnutí aktualizace obrazovky pomocí VBA v Excelu. Nyní se podíváme, jak můžeme vytvořit Makro k provedení tohoto úkonu.

⧪ Krok 1: Otevření okna VBA

Tisk ALT + F11 na klávesnici, abyste otevřeli Visual Basic okno.

⧪ Krok 2: Vložení nového modulu

Přejít na Vložit> Modul na panelu nástrojů. Klikněte na Modul . Nový modul s názvem Modul1 (nebo cokoli jiného v závislosti na vaší historii).

⧪ Krok 3: Vložení kódu VBA

Toto je nejdůležitější krok. Vložte zadaný VBA kód v modulu.

⧪ Krok 4: Spuštění kódu

Klikněte na Spustit Sub \ UserForm z panelu nástrojů nahoře.

Kód se spustí. A na pracovním listu najdete rychle vygenerovanou řadu čísel od 1 do 1 00 000, která by se jinak prováděla dlouho.

Přečtěte si více: [Řešeno]: Vzorce aplikace Excel se neaktualizují až do uložení (6 možných řešení)

Na co nezapomenout

Nemusíte se mnou po vypnutí aktualizace obrazovky dělat stejný úkol. Můžete dělat cokoli, co je vaším běžným úkolem. Jde ale o to, že efekt vypnutí aktualizace obrazovky nepochopíte, pokud nebudete dělat dlouhou sérii úkolů. Proto jsem vygeneroval posloupnost od 1 do 1 00 000. A to je důvod, proč jsem vygeneroval posloupnost.

Závěr

Proto se jedná o proces vývoje Makro vypnutí aktualizace obrazovky pomocí aplikace Excel VBA Máte nějaké dotazy? Neváhejte se nás zeptat. A nezapomeňte navštívit naše stránky. ExcelWIKI pro další příspěvky a aktualizace.

Hugh West je velmi zkušený školitel a analytik Excelu s více než 10 lety zkušeností v oboru. Má bakalářský titul v oboru Účetnictví a finance a magisterský titul v oboru Business Administration. Hugh má vášeň pro výuku a vyvinul jedinečný přístup k výuce, který lze snadno sledovat a pochopit. Jeho odborné znalosti Excelu pomohly tisícům studentů a profesionálů po celém světě zlepšit své dovednosti a vyniknout ve své kariéře. Prostřednictvím svého blogu Hugh sdílí své znalosti se světem a nabízí bezplatné výukové programy Excelu a online školení, které jednotlivcům a firmám pomohou dosáhnout jejich plného potenciálu.