Come utilizzare la funzione Salva con nome per sovrascrivere automaticamente un file esistente in Excel?
Quando si salva una cartella di lavoro Excel in una nuova cartella, verrà visualizzata una finestra di dialogo come mostrato nello screenshot sottostante se esiste già una cartella di lavoro con lo stesso nome nella cartella. Come sovrascrivere automaticamente il file esistente senza messaggi di avviso? Il metodo descritto in questo articolo può aiutarti.
Funzione Salva con nome per sovrascrivere automaticamente un file esistente con il codice VBA
Funzione Salva con nome per sovrascrivere automaticamente un file esistente con il codice VBA
Se desideri salvare una cartella di lavoro con un nuovo nome e sovrascrivere automaticamente il file esistente in Excel, procedi nel seguente modo.
1. Innanzitutto, crea un pulsante di comando per attivare la funzione Salva con nome nel tuo foglio di lavoro. Clicca su Sviluppatore > Inserisci > Pulsante di comando (Controllo ActiveX). Vedi screenshot:
2. Disegna un pulsante di comando sul tuo foglio di lavoro. Quindi fai clic destro su di esso e seleziona Visualizza codice dal menu contestuale.
3. Nella finestra Microsoft Visual Basic for Applications, copia il seguente codice VBA e incollalo tra le righe Private Sub ed End Sub nella finestra del Codice.
Codice VBA: Funzione Salva con nome per sovrascrivere automaticamente un file esistente
Dim xFileName As String
Application.DisplayAlerts = False
If Right(ActiveWorkbook.Name, 4) = "xlsm" Then
xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Macro-Enabled Workbook (*.xlsm),*.xlsm")
Else
xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Workbook (*.xlsx),*.xlsx")
End If
If (xFileName <> "") Or (xFileName <> "False") Then
ActiveWorkbook.SaveAs Filename:=xFileName
End If
Application.DisplayAlerts = True4. Premi i tasti Alt + Q per uscire dalla finestra Microsoft Visual Basic for Applications. E disattiva la Modalità progettazione sotto la scheda Sviluppatore.
5. Clicca sul pulsante di comando, quindi apparirà una finestra di dialogo Salva con nome. Seleziona una cartella in cui salvare questa cartella di lavoro e poi clicca sul pulsante Salva.
Se esiste già una cartella di lavoro con lo stesso nome nella cartella di destinazione, verrà sovrascritta automaticamente con la cartella di lavoro corrente senza alcun messaggio di conferma.
Sblocca la Magia di Excel con Kutools AI
- Esecuzione Intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici — tutto guidato da semplici comandi.
- Formule Personalizzate: Genera formule su misura per ottimizzare i tuoi flussi di lavoro.
- Codifica VBA: Scrivi e implementa codice VBA senza sforzo.
- Interpretazione delle Formule: Comprendi facilmente formule complesse.
- Traduzione del Testo: Superare le barriere linguistiche all'interno dei tuoi fogli di calcolo.
Articoli correlati:
- Come salvare un foglio di lavoro come file PDF e inviarlo come allegato tramite Outlook?
- Come salvare un file Excel con un timestamp?
- Come salvare o esportare più/tutti i fogli in file CSV o di testo separati in Excel?
- Come disabilitare o non consentire le opzioni Salva e Salva con nome in Excel?
- Come disabilitare il salvataggio della cartella di lavoro ma consentire solo Salva con nome in Excel?
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