Excelov makro za brisanje vseh razen aktivnega delovnega lista

Včasih boste morda želeli izbrisati vse razen aktivnega delovnega lista v Excelovem delovnem zvezku. V teh primerih lahko uporabite naslednji makro.

Kako deluje makro

Makro se tukaj vrti po delovnih listih in ujema vsako ime delovnega lista z imenom aktivnega lista. Vsakič, ko se makro zanke, izbriše kateri koli delovni list brez ujemanja. Upoštevajte uporabo lastnosti DisplayAlerts v 4. koraku. To dejansko izklopi Excelova opozorila, tako da vam ni treba potrditi vsakega izbrisa.

Podmakro1()
1. korak: Deklarirajte svoje spremenljivke
    Dim ws As Worksheet
2. korak: Začnite brskati po vseh delovnih listih
    Za vsako ws In ThisWorkbook.Worksheets
3. korak: Preverite ime vsakega delovnega lista
    Če ws.Name <> ThisWorkbook.ActiveSheet.Name Then
4. korak: Izklopite opozorila in izbrišite
    Application.DisplayAlerts = False
    ws.Izbriši
    Application.DisplayAlerts = True
    Konec Če
5. korak: Pojdite na naslednji delovni list
    Naslednji ws
Končni sub

Makro najprej razglasi objekt, imenovan ws. Ta korak ustvari pomnilniško posodo za vsak delovni list, skozi katerega se vrti.

V 2. koraku se makro začne vrteti in pove Excelu, da bo ocenil vse delovne liste v tem delovnem zvezku. Obstaja razlika med ThisWorkbook in ActiveWorkbook. Objekt ThisWorkBook se nanaša na delovni zvezek, ki vsebuje kodo. Objekt ActiveWorkBook se nanaša na trenutno aktivni delovni zvezek. Pogosto vrnejo isti predmet, a če delovni zvezek, ki izvaja kodo, ni aktivni delovni zvezek, vrnejo različne predmete. V tem primeru ne želite tvegati brisanja listov v drugih delovnih zvezkih, zato uporabite ThisWorkBook.

V 3. koraku makro preprosto primerja ime aktivnega lista z listom, ki je trenutno v zanki.

V 4. koraku, če se imena listov razlikujejo, makro izbriše list. Kot že omenjeno, uporabite DisplayAlerts, da preprečite morebitna potrditvena preverjanja iz Excela. Če želite biti opozorjeni, preden izbrišete liste, lahko izpustite aplikacijo. DisplayAlerts = False. Če izpustite stavek DisplayAlerts, boste zagotovili prikazano sporočilo, kar vam bo omogočilo, da se umaknete iz odločitve za brisanje delovnih listov.

V 5. koraku se makro vrne nazaj, da dobi naslednji list. Ko so vsi listi ovrednoteni, se makro konča.

Excelov makro za brisanje vseh razen aktivnega delovnega lista

Če si želite ogledati opozorilna sporočila, izpustite stavek DisplayAlerts.

Kako uporabljati makro

Če želite implementirati ta makro, ga lahko kopirate in prilepite v standardni modul:

Aktivirajte urejevalnik Visual Basic s pritiskom na Alt+F11.

Z desno tipko miške kliknite ime projekta/delovnega zvezka v oknu projekta.

Izberite Vstavi → Modul.

V novo ustvarjeni modul vnesite ali prilepite kodo.

Ko v makru uporabljate ThisWorkbook namesto ActiveWorkbook, makra ne morete zagnati iz osebnega delovnega zvezka z makrami. zakaj? Ker bi se ThisWorkbook nanašal na osebni delovni zvezek makra, ne na delovni zvezek, za katerega bi se moral makro uporabiti.


Kako preprečiti, da Microsoft Word odpira datoteke v načinu samo za branje v sistemu Windows

Kako preprečiti, da Microsoft Word odpira datoteke v načinu samo za branje v sistemu Windows

Kako preprečiti, da Microsoft Word odpira datoteke v načinu samo za branje v sistemu Windows Microsoft Word odpira datoteke v načinu samo za branje, zaradi česar jih je nemogoče urejati? Ne skrbite, metode so spodaj

Kako popraviti nepravilno tiskanje dokumentov Microsoft Word

Kako popraviti nepravilno tiskanje dokumentov Microsoft Word

Kako odpraviti napake pri tiskanju nepravilnih dokumentov Microsoft Word Napake pri tiskanju dokumentov Word s spremenjeno pisavo, neurejenimi odstavki, manjkajočim besedilom ali izgubljeno vsebino so precej pogoste. Vendar pa ne

Izbrišite risbe s peresom in označevalnikom na diapozitivih PowerPoint

Izbrišite risbe s peresom in označevalnikom na diapozitivih PowerPoint

Če ste med predstavitvijo uporabili pero ali označevalnik za risanje po diapozitivih PowerPoint, lahko risbe shranite za naslednjo predstavitev ali jih izbrišete, tako da boste naslednjič, ko ga pokažete, začeli s čistimi PowerPointovimi diapozitivi. Sledite tem navodilom za brisanje risb s peresom in označevalnikom: Brisanje črt ena na […]

Vsebina knjižnice slogov v SharePointu 2010

Vsebina knjižnice slogov v SharePointu 2010

Knjižnica slogov vsebuje datoteke CSS, datoteke Extensible Stylesheet Language (XSL) in slike, ki jih uporabljajo vnaprej določene glavne strani, postavitve strani in kontrolniki v SharePointu 2010. Če želite poiskati datoteke CSS v knjižnici slogov na založniškem mestu: Izberite Dejanja mesta→ Pogled Vsa vsebina spletnega mesta. Prikaže se vsebina spletnega mesta. Knjižnica Style se nahaja v […]

Oblikujte številke v tisoče in milijone v poročilih Excel

Oblikujte številke v tisoče in milijone v poročilih Excel

Ne preobremenjujte občinstva z ogromnimi številkami. V Microsoft Excelu lahko izboljšate berljivost svojih nadzornih plošč in poročil tako, da oblikujete svoje številke tako, da se prikažejo v tisočih ali milijonih.

Kako deliti in spremljati SharePointova spletna mesta

Kako deliti in spremljati SharePointova spletna mesta

Naučite se uporabljati SharePointova orodja za socialno mreženje, ki posameznikom in skupinam omogočajo komunikacijo, sodelovanje, skupno rabo in povezovanje.

Kako pretvoriti datume v julijanske oblike v Excelu

Kako pretvoriti datume v julijanske oblike v Excelu

Julijanski datumi se v proizvodnih okoljih pogosto uporabljajo kot časovni žig in hitra referenca za številko serije. Ta vrsta datumskega kodiranja omogoča trgovcem na drobno, potrošnikom in servisnim agentom, da ugotovijo, kdaj je bil izdelek izdelan in s tem starost izdelka. Julijanski datumi se uporabljajo tudi v programiranju, vojski in astronomiji. Drugačen […]

Kako ustvariti spletno aplikacijo Access

Kako ustvariti spletno aplikacijo Access

Spletno aplikacijo lahko ustvarite v Accessu 2016. Kaj je torej spletna aplikacija? No, splet pomeni, da je na spletu, aplikacija pa je le okrajšava za »aplikacijo«. Spletna aplikacija po meri je spletna aplikacija baze podatkov, do katere dostopate iz oblaka z uporabo brskalnika. Spletno aplikacijo gradite in vzdržujete v namizni različici […]

Vrstica za hitri zagon v SharePointu 2010

Vrstica za hitri zagon v SharePointu 2010

Večina strani v SharePointu 2010 prikaže seznam navigacijskih povezav v vrstici za hitri zagon na levi strani strani. Vrstica za hitri zagon prikazuje povezave do predstavljene vsebine spletnega mesta, kot so seznami, knjižnice, spletna mesta in strani za objavljanje. Vrstica za hitri zagon vključuje dve zelo pomembni povezavi: Povezava do vse vsebine spletnega mesta: […]

Kaj pomenijo sporočila o napakah reševalca v Excelu?

Kaj pomenijo sporočila o napakah reševalca v Excelu?

Pri preprostih težavah reševalec v Excelu običajno hitro najde optimalne vrednosti spremenljivke reševalca za ciljno funkcijo. Toda v nekaterih primerih ima Solver težave pri iskanju vrednosti spremenljivke Solver, ki optimizirajo ciljno funkcijo. V teh primerih Solver običajno prikaže sporočilo ali sporočilo o napaki, ki opisuje ali razpravlja o težavi, ki […]