Excel makronaredba za brisanje svih osim aktivnog radnog lista

Ponekad ćete možda htjeti izbrisati sve osim aktivnog radnog lista u radnoj knjizi programa Excel. U tim situacijama možete koristiti sljedeću makronaredbu.

Kako makro funkcionira

Makronaredba ovdje prolazi kroz radne listove, uparujući naziv svakog radnog lista s imenom aktivnog lista. Svaki put kada se makronaredba ponovi, briše svaki radni list bez podudaranja. Obratite pažnju na korištenje svojstva DisplayAlerts u 4. koraku. Ovo učinkovito isključuje Excelova upozorenja tako da ne morate potvrđivati ​​svako brisanje.

Podmakro1()
'Korak 1: Deklarirajte svoje varijable
    Dim ws As Worksheet
'Korak 2: Počnite pregledavati sve radne listove
    Za svaki ws U ovoj radnoj knjizi.Radni listovi
'Korak 3: Provjerite naziv svakog radnog lista
    Ako ws.Name <> ThisWorkbook.ActiveSheet.Name Then
'Korak 4: Isključite upozorenja i izbrišite
    Application.DisplayAlerts = False
    ws.Izbriši
    Application.DisplayAlerts = Točno
    Završi ako
'Korak 5: Pređite na sljedeći radni list
    Sljedeći ws
Kraj Sub

Makro prvo deklarira objekt koji se zove ws. Ovaj korak stvara memorijski spremnik za svaki radni list kroz koji prolazi.

U koraku 2, makronaredba se počinje vrtiti u petlji, govoreći Excelu da će procijeniti sve radne listove u ovoj radnoj knjizi. Postoji razlika između ThisWorkbook i ActiveWorkbook. Objekt ThisWorkBook odnosi se na radnu knjigu koja sadrži kod. Objekt ActiveWorkBook odnosi se na trenutno aktivnu radnu knjigu. Često vraćaju isti objekt, ali ako radna knjiga koja pokreće kod nije aktivna radna knjiga, vraćaju različite objekte. U ovom slučaju ne želite riskirati brisanje listova u drugim radnim knjigama, pa koristite ThisWorkBook.

U 3. koraku makronaredba jednostavno uspoređuje naziv aktivnog lista s listom koji se trenutno vrti u petlji.

U 4. koraku, ako su nazivi listova različiti, makronaredba briše list. Kao što je spomenuto, koristite DisplayAlerts za suzbijanje svih provjera potvrde iz Excela. Ako želite biti upozoreni prije brisanja listova, možete izostaviti Application. DisplayAlerts = False. Izostavljanje izjave DisplayAlerts osigurat će vam da dobijete prikazanu poruku, što će vam omogućiti da odustanete od odluke o brisanju radnih listova.

U 5. koraku makronaredba se vraća u petlju kako bi dobila sljedeći list. Nakon što se procijene svi listovi, makronaredba završava.

Excel makronaredba za brisanje svih osim aktivnog radnog lista

Izostavite iskaz DisplayAlerts da biste vidjeli poruke upozorenja.

Kako koristiti makro

Da biste implementirali ovu makronaredbu, možete je kopirati i zalijepiti u standardni modul:

Aktivirajte Visual Basic Editor pritiskom na Alt+F11.

Desnom tipkom miša kliknite naziv projekta/radne knjige u prozoru projekta.

Odaberite Umetanje→Modul.

Upišite ili zalijepite kod u novostvoreni modul.

Kada koristite ThisWorkbook umjesto ActiveWorkbook u makronaredbi, ne možete pokrenuti makronaredbu iz radne knjige osobne makronaredbe. Zašto? Budući da bi se ThisWorkbook odnosio na osobnu radnu knjigu makronaredbi, a ne na radnu knjigu na koju bi se makronaredba trebala primijeniti.


Kako blokirati Microsoft Word da otvara datoteke u načinu rada samo za čitanje u sustavu Windows

Kako blokirati Microsoft Word da otvara datoteke u načinu rada samo za čitanje u sustavu Windows

Kako blokirati Microsoft Word da otvara datoteke u načinu rada samo za čitanje u sustavu Windows Microsoft Word otvara datoteke u načinu rada samo za čitanje, što onemogućuje njihovo uređivanje? Ne brinite, metode su navedene u nastavku

Kako popraviti pogrešan ispis Microsoft Word dokumenata

Kako popraviti pogrešan ispis Microsoft Word dokumenata

Kako popraviti pogreške u ispisu netočnih Microsoft Word dokumenata Pogreške u ispisu Word dokumenata s promijenjenim fontovima, neurednim odlomcima, nedostajućim tekstom ili izgubljenim sadržajem vrlo su česte. Međutim, nemojte

Izbrišite crteže olovkom i markerom na svojim PowerPoint slajdovima

Izbrišite crteže olovkom i markerom na svojim PowerPoint slajdovima

Ako ste upotrijebili olovku ili marker za crtanje na PowerPoint slajdovima tijekom prezentacije, možete spremiti crteže za sljedeću prezentaciju ili ih izbrisati tako da ćete sljedeći put kada ih pokažete početi s čistim PowerPoint slajdovima. Slijedite ove upute za brisanje crteža olovkom i markerom: Brisanje linija jedan na […]

Sadržaj biblioteke stilova u sustavu SharePoint 2010

Sadržaj biblioteke stilova u sustavu SharePoint 2010

Biblioteka stilova sadrži CSS datoteke, datoteke Extensible Stylesheet Language (XSL) i slike koje koriste unaprijed definirane glavne stranice, izgledi stranica i kontrole u SharePointu 2010. Da biste locirali CSS datoteke u biblioteci stilova web-mjesta za objavljivanje: Odaberite Radnje web-mjesta→Prikaz Sav sadržaj web-mjesta. Pojavljuje se sadržaj stranice. Knjižnica Style nalazi se u […]

Formatirajte brojeve u tisućama i milijunima u Excel izvješćima

Formatirajte brojeve u tisućama i milijunima u Excel izvješćima

Nemojte zatrpavati svoju publiku ogromnim brojevima. U Microsoft Excelu možete poboljšati čitljivost svojih nadzornih ploča i izvješća formatiranjem brojeva tako da se prikazuju u tisućama ili milijunima.

Kako dijeliti i pratiti SharePoint web-mjesta

Kako dijeliti i pratiti SharePoint web-mjesta

Naučite kako koristiti SharePointove alate za društveno umrežavanje koji pojedincima i grupama omogućuju komunikaciju, suradnju, dijeljenje i povezivanje.

Kako pretvoriti datume u julijanske formate u Excelu

Kako pretvoriti datume u julijanske formate u Excelu

Julijanski datumi se često koriste u proizvodnim okruženjima kao vremenska oznaka i brza referenca za broj serije. Ova vrsta datumskog kodiranja omogućuje trgovcima na malo, potrošačima i uslužnim agentima da identificiraju kada je proizvod napravljen, a time i starost proizvoda. Julijanski datumi se također koriste u programiranju, vojsci i astronomiji. Drugačiji […]

Kako stvoriti Access web aplikaciju

Kako stvoriti Access web aplikaciju

Možete izraditi web-aplikaciju u Accessu 2016. Dakle, što je uopće web-aplikacija? Pa, web znači da je online, a aplikacija je samo skraćenica za "aplikaciju". Prilagođena web-aplikacija je online aplikacija baze podataka kojoj se pristupa iz oblaka pomoću preglednika. Vi gradite i održavate web-aplikaciju u verziji za stolna računala […]

Traka za brzo pokretanje u sustavu SharePoint 2010

Traka za brzo pokretanje u sustavu SharePoint 2010

Većina stranica u sustavu SharePoint 2010 prikazuje popis navigacijskih veza na traci za brzo pokretanje na lijevoj strani stranice. Traka za brzo pokretanje prikazuje veze na istaknuti sadržaj web-mjesta kao što su popisi, knjižnice, web-mjesta i stranice za objavljivanje. Traka za brzo pokretanje uključuje dvije vrlo važne veze: vezu za sav sadržaj web-mjesta: […]

Što znače poruke o greškama Solvera u Excelu?

Što znače poruke o greškama Solvera u Excelu?

Za jednostavne probleme, Solver u Excelu obično brzo pronalazi optimalne vrijednosti varijable Solvera za funkciju cilja. No, u nekim slučajevima, Solver ima problema s pronalaženjem vrijednosti varijable Solvera koje optimiziraju funkciju cilja. U tim slučajevima, Solver obično prikazuje poruku ili poruku o pogrešci koja opisuje ili raspravlja o problemu koji […]