Ak pracujete na viacerých zošitoch súčasne a potrebujete makro, ktoré vám pomôže skryť všetky neaktívne zošity, potom vám tento článok určite pomôže.
V tomto článku sa zameriame na to, ako môžeme skryť viacero zošitov, ktoré práve nepoužívate.
Otázka: Potrebujem rýchlo skryť všetky súbory programu Excel okrem toho, ktorý práve používam, aby som mohol plynule prepínať medzi inými aplikáciami. Chcel by som hľadať kód VBA pre túto moju jedinečnú požiadavku.
Aby sme získali kód na skrytie všetkých neaktívnych zošitov, musíme pri spustení editora VB vykonať nasledujúce kroky.
- Kliknite na kartu Vývojár
- Zo skupiny kódov vyberte Visual Basic
- Skopírujte nasledujúci kód do modulu pracovného hárka
Sub HideInactiveExcelWorkbooks () Application.ScreenUpdating = False Dim aWin As Window Set aWin = ActiveWindow Dim win as Window for each win in Application.Windows win.Visible = False Next win aWin.Visible = True Application.ScreenUpdating = True End Sub
- Vyššie uvedený kód okamžite skryje všetky neaktívne zošity
Poznámka: Vyššie uvedené makro neskrýva aktívny zošit.
Ak chcete odkryť všetky zošity, musíme postupovať podľa nasledujúcich krokov:
- Kliknite na kartu Zobraziť
- Kliknite na položku Odkryť
- Zobrazí sa odkryté zošity
- Výberom každého z nich a kliknutím na tlačidlo Ok sa zošit odkryje
Záver: Pomocou vyššie uvedeného kódu makra môžeme skryť stovky zošitov, ktoré nie sú aktívne, jediným kliknutím.
Ak sa vám páčili naše blogy, zdieľajte ich so svojimi priateľmi na Facebooku. A tiež nás môžete sledovať na Twitteri a Facebooku.
Radi by sme vás počuli, dajte nám vedieť, ako môžeme zlepšiť, doplniť alebo inovovať našu prácu a zlepšiť ju pre vás. Napíšte nám na emailovú stránku