Excel VBA: ekraani uuendamise väljalülitamine

  • Jaga Seda
Hugh West

See on meie kõigi jaoks oluline küsimus, kui me töötame koos VBA Excelis, et lülitada ekraani uuendamine välja. Selles artiklis näitan teile, kuidas saate ekraani uuendamise välja lülitada, kasutades VBA Excelis.

Excel VBA: ekraani uuendamise väljalülitamine (kiire vaade)

 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 

Lae alla praktiline töövihik

Lae alla see harjutusvihik, et seda artiklit lugedes harjutada.

Lülita ekraani uuendamine välja.xlsm

Ülevaade ekraani uuendamise väljalülitamisest Exceli VBA abil

Ekraani uuendamise väljalülitamine kasutades VBA on lihtne. Tõele au andes piisab selleks vaid ühest reast.

 Application.ScreenUpdating = False 

See üks koodirida lülitab ekraani uuendamise teie jaoks välja, kuid te ei saa selle ühe reaga tunda selle mõju. Et seda tunda, sisestage mõned koodiread, mis teevad teie jaoks pärast ekraani uuendamist mõningaid ülesandeid. Parem on, kui see on pikk ülesanne, mis paneb teid mõistma ekraani uuendamise mõju.

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

Need read sisestavad aktiivsele lehele rea 1 kuni 100 000, alustades lahtrist A1 . Kui teete seda ilma ekraani uuendamiseta, võtab see kaua aega. Sest iga kord, kui ta sisestab numbri järgmisesse lahtrisse, uuendatakse koos sellega ka varasemat lahtrit.

Kui aga jätate ekraani uuendamise välja lülitatud, ei uuendata iga kord varasemaid lahtreid ja operatsiooni sooritamine võtab vähem aega.

Seejärel saate soovi korral uuesti ekraani uuendamise sisse lülitada.

 Application.ScreenUpdating = True 

Nii et täielik VBA kood on:

VBA kood:

 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 

Loe edasi: [Parandatud!] Exceli lahtrid ei uuenda, kui ei tehta topeltklõpsu (5 lahendust)

Sarnased lugemised

  • Kuidas värskendada Exceli lehte automaatselt (3 sobivat meetodit)
  • Kuidas automaatselt uuendada Pivot tabelit, kui lähteandmed muutuvad
  • Pivot tabel ei värskendata (5 probleemi & lahendused)
  • Kuidas automaatselt värskendada Pivot tabelit ilma VBA-ta Excelis (3 nutikat meetodit)

Makro väljatöötamine ekraani uuendamise väljalülitamiseks Exceli VBA abil

Me nägime samm-sammult koodi analüüsi, et lülitada välja ekraani uuendamine kasutades VBA Excelis. Nüüd vaatame, kuidas me saame arendada Makro selle teostamiseks.

⧪ 1. samm: VBA akna avamine

Press ALT + F11 klaviatuuril, et avada Visual Basic aken.

⧪ 2. samm: uue mooduli sisestamine

Mine edasi Insert> moodul tööriistaribal. Klõpsake Moodul Uus moodul nimega Moodul1 (või midagi muud, sõltuvalt teie varasemast ajaloost) avaneb.

⧪ 3. samm: VBA koodi sisestamine

See on kõige olulisem samm. Sisestage antud VBA kood moodulis.

⧪ 4. samm: koodi käivitamine

Klõpsake nuppu Run Sub \ UserForm tööriistaribalt ülalpool olevast tööriistast.

Kood käivitub. Ja te leiate oma töölehel kiiresti genereeritud numbrite seeria vahemikus 1 kuni 1,00,000, mille täitmine võtaks muidu kaua aega.

Loe edasi: [Lahendatud]: Exceli valemid ei uuendata kuni salvestamiseni (6 võimalikku lahendust)

Asjad, mida meeles pidada

Sa ei pea minuga pärast ekraani uuendamise väljalülitamist sama ülesannet tegema. Sa võid teha mis iganes on sinu tavapärane ülesanne. Aga asi on selles, et sa ei saa aru ekraani uuendamise väljalülitamise mõjust, kui sa ei tee pikka ülesannete seeriat. Sellepärast ma genereerisin järjestuse 1 kuni 1,00,000.

Kokkuvõte

Seega on see protsess, et arendada Makro ekraani uuendamise väljalülitamine Exceli abil VBA Kas teil on küsimusi? Küsige meilt julgelt. Ja ärge unustage külastada meie veebilehte. ExcelWIKI rohkem postitusi ja uuendusi.

Hugh West on suurte kogemustega Exceli koolitaja ja analüütik, kellel on selles valdkonnas üle 10-aastane kogemus. Tal on raamatupidamise ja rahanduse bakalaureusekraad ning ärijuhtimise magistrikraad. Hugh’l on kirg õpetamise vastu ning ta on välja töötanud ainulaadse õpetamisviisi, mida on lihtne järgida ja mõista. Tema Exceli ekspertteadmised on aidanud tuhandetel õpilastel ja spetsialistidel üle maailma oma oskusi parandada ja karjääris silma paista. Oma ajaveebi kaudu jagab Hugh oma teadmisi maailmaga, pakkudes tasuta Exceli õpetusi ja veebikoolitusi, mis aitavad üksikisikutel ja ettevõtetel oma potentsiaali täielikult ära kasutada.