Dacă lucrați la mai multe cărți de lucru în același timp și aveți nevoie de o macrocomandă care să vă ajute să ascundeți toate registrele de lucru inactive, atunci acest articol vă va ajuta cu siguranță.
În acest articol, ne vom concentra asupra modului în care putem ascunde mai multe registre de lucru pe care nu le utilizați în prezent.
Întrebare: Trebuie să ascund rapid toate fișierele Excel, cu excepția celui pe care îl folosesc în prezent, astfel încât să pot comuta fără probleme între alte aplicații. Aș dori să caut cod VBA pentru această cerință unică a mea.
Pentru a obține codul pentru ascunderea tuturor registrelor de lucru inactive, trebuie să urmăm pașii de mai jos pentru a lansa editorul VB
- Faceți clic pe fila Dezvoltator
- Din grupul de coduri, selectați Visual Basic
- Copiați următorul cod în modulul de foaie de lucru
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
- Codul de mai sus va ascunde imediat toate registrele de lucru inactive
Notă: macro-ul de mai sus nu va ascunde registrul de lucru activ.
Pentru a afișa toate registrele de lucru, trebuie să urmăm pașii de mai jos:
- Faceți clic pe fila Vizualizare
- Faceți clic pe Afișează
- Aceasta va afișa registrele de lucru afișate
- Selectarea fiecăruia și clic pe butonul Ok va afișa registrul de lucru
Concluzie: Putem ascunde sute de registre de lucru care nu sunt active cu un singur clic folosind codul macro de mai sus.
Dacă ți-au plăcut blogurile noastre, împărtășește-le prietenilor tăi de pe Facebook. Și, de asemenea, ne puteți urmări pe Twitter și Facebook.
Ne-ar plăcea să aflăm de la dvs., să ne anunțați cum putem îmbunătăți, completa sau inova munca noastră și să o îmbunătățim. Scrieți-ne pe site-ul de e-mail