Vai al contenuto principale

Come chiudere rapidamente tutte le cartelle di lavoro tranne quella attiva?

Se nel tuo computer sono aperte più cartelle di lavoro e ora, vuoi chiuderle tutte ma lasciare quella attiva. Esistono modi rapidi per affrontare questo lavoro tranne chiudere le altre cartelle di lavoro una per una? In questo articolo, parlerò di alcuni semplici modi per risolverlo con un clic.

Chiudi tutte le cartelle di lavoro tranne quella attiva con codice VBA

Chiudi tutte le cartelle di lavoro tranne quella attiva con la scheda Office


freccia blu freccia destra Chiudi tutte le cartelle di lavoro tranne quella attiva con codice VBA

Con il seguente codice VBA, puoi chiudere rapidamente tutte le cartelle di lavoro aperte tranne quella attiva, per favore fai come segue:

1. Attiva la cartella di lavoro che vuoi tenere aperta.

2. Tieni premuto il ALT + F11 chiavi per aprire il Finestra di Microsoft Visual Basic, Applications Edition.

3. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: chiudi tutte le cartelle di lavoro tranne quella attiva

Private Sub CloseOtherWorkbook()
'Update 20141126
Dim xWB As Workbook
Application.ScreenUpdating = False
For Each xWB In Application.Workbooks
    If Not (xWB Is Application.ActiveWorkbook) Then
        xWB.Close
    End If
Next
Application.ScreenUpdating = True
End Sub

4. Quindi premere F5 chiave per eseguire questo codice, quindi tutte le altre cartelle di lavoro sono state chiuse contemporaneamente, ma lascia solo quella attiva.


freccia blu freccia destra Chiudi tutte le cartelle di lavoro tranne quella attiva con la scheda Office

Se sei interessato a un nuovo prodotto - Office Tab, può aiutarti ad aprire più documenti / file in una singola finestra a schede, con essa puoi chiudere tutte le cartelle di lavoro ma lasciarne una attiva con un clic. Puoi saperne di più e scaricare il file Office Tab da qui.

Dopo l'installazione Office Tab, vedrai che tutte le cartelle di lavoro aperte vengono visualizzate in un'unica finestra a schede, vedi screenshot:

doc-chiudi-altre-cartelle-1

Quindi fare clic sul nome della cartella di lavoro che si desidera lasciare aperta e fare clic con il pulsante destro del mouse sulla scheda del nome, quindi scegliere Chiudi altro dal menu contestuale, vedi screenshot:

doc-chiudi-altre-cartelle-1

E poi, puoi vedere solo la tua cartella di lavoro attiva aperta.


Articolo correlato:

Come chiudere rapidamente tutte le cartelle di lavoro in Excel?

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
can the macro be modified to close microsoft publisher files
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations