Come eliminare la cartella di lavoro corrente (file corrente) in Excel?
Supponiamo che tu abbia scaricato una cartella di lavoro da un sito web e questa si sia aperta automaticamente. Tuttavia, potrebbe non essere quella giusta o potrebbe non contenere le informazioni necessarie, e quindi vuoi eliminarla. A volte, probabilmente hai dimenticato la directory predefinita in cui i file scaricati vengono salvati automaticamente. Non preoccuparti, possiamo eliminare la cartella di lavoro attiva/aperta senza chiuderla direttamente in Excel.
Elimina la cartella di lavoro corrente (file corrente) con VBA
Elimina la cartella di lavoro corrente (file corrente) con VBA
Questo metodo introdurrà un VBA per eliminare la cartella di lavoro corrente/aperta senza chiuderla in Excel. Procedi come segue:
1. Premi contemporaneamente i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.
2. Clicca su Inserisci > Modulo, copia il seguente codice VBA e incollalo nella finestra del modulo aperto.
VBA: Elimina la Cartella di Lavoro Corrente senza chiuderla in Excel
Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub3. Premi il tasto F5 o clicca sul pulsante Esegui per eseguire questo VBA.
Note:
(1) Questo VBA può eliminare la cartella di lavoro corrente, ma non può chiudere la finestra di Excel. Se non ci sono altre cartelle di lavoro aperte dopo aver eliminato quella corrente, chiudi manualmente la finestra di Excel.
(2) Se la cartella di lavoro corrente non è mai stata salvata prima, questo VBA non sarà in grado di eliminarla. Tuttavia, puoi eliminare questa cartella di lavoro non salvata chiudendola direttamente.
I migliori strumenti per la produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un'efficienza mai vista prima. Kutools per Excel offre oltre300 funzionalità avanzate per aumentare la produttività e farti risparmiare tempo. Clicca qui per ottenere la funzione di cui hai più bisogno...
Office Tab porta le schede su Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra invece che in nuove finestre.
- Aumenta la produttività del50% e riduce centinaia di clic del mouse ogni giorno!
Tutti gli add-in Kutools. Un solo programma di installazione
La suite Kutools for Office include add-in per Excel, Word, Outlook & PowerPoint più Office Tab Pro, ideale per i team che lavorano su più app di Office.
- Suite tutto-in-uno — Add-in per Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un solo programma di installazione, una sola licenza — configurazione in pochi minuti (pronto per MSI)
- Funzionano meglio insieme — produttività ottimizzata su tutte le app Office
- Prova completa30 giorni — nessuna registrazione, nessuna carta di credito
- Massimo risparmio — costa meno rispetto all’acquisto singolo degli add-in