With følgende VBA-kode, kan du raskt lukke alle åpne arbeidsbøker unntatt den aktive, kan du gjøre som dette:
1. Aktiver arbeidsbok som du ønsker å holde åpent.
To. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
3. Klikk Sett > Modul, og lim inn følgende kode i modulen Window
VBA-kode. Lukk alle arbeidsbøker unntatt aktiv en
Private Sub CloseOtherWorkbook () 'Update 20141126Dim XWB Som WorkbookApplication.ScreenUpdating = FalseFor Hver XWB I Application.Workbooks Hvis ikke (XWB Is Application.ActiveWorkbook) Så xWB.Close End IfNextApplication.ScreenUpdating = TrueEnd Sub4. Deretter trykker F5 for å kjøre denne koden, og deretter alle de andre arbeidsbøker har blitt lukket på en gang, men la bare den aktive.

Lukk alle arbeidsbøker unntatt aktive med Office Tab
Hvis du er interessert i et nytt produkt - Kontor Tab, kan det hjelpe deg til å åpne flere dokumenter /filer i en enkelt faner, med den, kan du lukke alle arbeidsbøker, men la aktiv en med ett klikk. Du kan få vite mer og ned laste Office Tab herfra
Etter installerer Office Tab, vil du se alle de åpne arbeidsbøker vises i én faner, se skjermbilde.
Klikk deretter navnet arbeidsbok du ønsker å forlate åpnet, og høyreklikk på fanenavn, og velg Lukk Annet fra hurtigmenyen, se skjermbilde.
Og så kan du bare se din aktive arbeidsboken åpnes Anmeldelser

Previous:Hvordan legge til beregnede felt for å svinge bordet?

Next Page:? Hvordan du raskt kombinere tekst og dato i samme celle i Excel