Jos työskentelet useiden työkirjojen kanssa samanaikaisesti ja tarvitset makron, joka auttaa piilottamaan kaikki passiiviset työkirjat, tämä artikkeli auttaa sinua varmasti.
Tässä artikkelissa keskitymme siihen, miten voimme piilottaa useita työkirjoja, joita et tällä hetkellä käytä.
Kysymys: Minun täytyy nopeasti piilottaa kaikki Excel -tiedostot paitsi tällä hetkellä käyttämäni, jotta voin vaihtaa muiden sovellusten välillä sujuvasti. Haluaisin etsiä VBA -koodia tähän ainutlaatuiseen vaatimukseeni.
Saadaksemme koodin kaikkien passiivisten työkirjojen piilottamiseksi meidän on suoritettava seuraavat vaiheet VB -editorin käynnistämiseksi
- Napsauta Kehittäjä -välilehteä
- Valitse koodiryhmästä Visual Basic
- Kopioi seuraava koodi laskentataulukkomoduulissa
Sub HideInactiveExcelWorkbooks () Application.ScreenUpdating = False Dim aWin kuten Window Set aWin = ActiveWindow Dim win ikkunana jokaiselle voitolle Application.Windows win.Visible = False Seuraava voitto aWin.Visible = True Application.ScreenUpdating = True End Sub
- Yllä oleva koodi piilottaa kaikki passiiviset työkirjat välittömästi
Huomautus: yllä oleva makro ei piilota aktiivista työkirjaa.
Jos haluat näyttää kaikki työkirjat, meidän on noudatettava seuraavia vaiheita:
- Napsauta Näytä -välilehteä
- Napsauta Näytä
- Tämä näyttää piilotetut työkirjat
- Kun valitset kunkin ja napsautat OK -painiketta, työkirja näkyy
Johtopäätös: Voimme piilottaa satoja työkirjoja, jotka eivät ole aktiivisia yhdellä napsautuksella käyttämällä yllä olevaa makrokoodia.
Jos pidit blogistamme, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa, täydentää tai innovoida työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse