Dölj inaktiva arbetsböcker genom VBA

Innehållsförteckning

Om du arbetar med flera arbetsböcker samtidigt och du behöver ett makro som hjälper dig att dölja alla inaktiva arbetsböcker, kommer den här artikeln definitivt att hjälpa dig.

I den här artikeln kommer vi att fokusera på hur vi kan dölja flera arbetsböcker som du för närvarande inte använder.

Fråga: Jag måste snabbt dölja alla excel -filer utom den jag använder för närvarande så att jag kan växla mellan andra applikationer smidigt. Jag skulle vilja söka VBA -kod för detta unika krav på mig.

För att få koden för att dölja alla inaktiva arbetsböcker måste vi följa stegen nedan för att starta VB -editor

  • Klicka på fliken Utvecklare
  • Välj Visual Basic i kodgruppen

  • Kopiera följande kod i kalkylbladsmodulen
 Sub HideInactiveExcelWorkbooks () Application.ScreenUpdating = False Dim aWin As Window Set aWin = ActiveWindow Dim win As Window För varje vinst i Application.Windows win.Visible = False Nästa vinst aWin.Visible = True Application.ScreenUpdating = True End Sub 

  • Ovanstående kod döljer alla inaktiva arbetsböcker omedelbart

Obs! Makroet ovan kommer inte att dölja aktiv arbetsbok.

För att visa alla arbetsböcker måste vi följa stegen nedan:

  • Klicka på fliken Visa
  • Klicka på Unhide

  • Detta visar arbetsböckerna som inte visas

  • Om du markerar var och en och klickar på Ok -knappen visas arbetsboken

Slutsats: Vi kan dölja hundratals arbetsböcker som inte är aktiva med ett enda klick med hjälp av makrokoden ovan.

Om du gillade våra bloggar, dela den med dina vänner på Facebook. Och du kan också följa oss på Twitter och Facebook.
Vi vill gärna höra från dig, låt oss veta hur vi kan förbättra, komplettera eller förnya vårt arbete och göra det bättre för dig. Skriv till oss på e -postwebbplatsen

Du kommer att bidra till utvecklingen av webbplatsen, dela sidan med dina vänner

wave wave wave wave wave