Če delate na več delovnih zvezkih hkrati in potrebujete makro, ki vam bo pomagal skriti vse neaktivne delovne zvezke, vam bo ta članek zagotovo v pomoč.
V tem članku se bomo osredotočili na to, kako lahko skrijemo več delovnih zvezkov, ki jih trenutno ne uporabljate.
Vprašanje: Hitro moram skriti vse datoteke Excel, razen tiste, ki jo trenutno uporabljam, da lahko brez težav preklapljam med drugimi aplikacijami. Za to edinstveno zahtevo bi rad poiskal kodo VBA.
Da bi dobili kodo za skrivanje vseh nedejavnih delovnih zvezkov, moramo slediti spodnjim korakom za zagon urejevalnika VB
- Kliknite zavihek Razvijalec
- V skupini Koda izberite Visual Basic
- Kopirajte naslednjo kodo v modul delovnega lista
Sub HideInactiveExcelWorkbooks () Application.ScreenUpdating = False Dim aWin As Window Set aWin = ActiveWindow Dim win As Window Za vsako zmago v Application.Windows win.Visible = False Next win aWin.Visible = True Application.ScreenUpdating = True End Sub
- Zgornja koda bo takoj skrila vse neaktivne delovne zvezke
Opomba: zgornji makro ne bo skril aktivnega delovnega zvezka.
Če želite razkriti vse delovne zvezke, morate slediti naslednjim korakom:
- Kliknite zavihek Pogled
- Kliknite na Skrij
- To bo prikazalo skrite delovne zvezke
- Če izberete vsakega in kliknete gumb V redu, se delovni zvezek razkrije
Zaključek: Na stotine delovnih zvezkov, ki niso aktivni, lahko skrijemo z enim klikom z uporabo zgornje kode makra.
Če so vam bili naši blogi všeč, jih delite s prijatelji na Facebooku. Prav tako nas lahko spremljate na Twitterju in Facebooku.
Radi bi slišali od vas, nam sporočite, kako lahko izboljšamo, dopolnimo ali inoviramo svoje delo in ga izboljšamo. Pišite nam na spletni strani elektronske pošte