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 = True

4. 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.

Potenzia le tue capacità di Excel con strumenti alimentati dall'IA. Scarica Ora ed esperisci un'efficienza mai vista prima!

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?