Come utilizzare la funzione Salva con nome per sovrascrivere automaticamente il file esistente in Excel?
Quando si salva una cartella di lavoro di Excel in una nuova cartella, verrà visualizzata una finestra di messaggio come mostrato nell'immagine sottostante se esiste una cartella di lavoro con lo stesso nome e si trova nella cartella. Come sovrascrivere automaticamente il file esistente senza un messaggio di avviso immediato? Il metodo in questo articolo può aiutarti.
Salva come funzione per sovrascrivere automaticamente il file esistente con il codice VBA
Salva come funzione per sovrascrivere automaticamente il 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. Si prega di fare quanto segue.
1. In primo luogo, creare un pulsante di comando per attivare la funzione Salva con nome nel foglio di lavoro. Fare clic su Costruttori > inserire > Pulsante di comando (controllo Active X). Vedi screenshot:
2. Disegna un pulsante di comando nel foglio di lavoro. Quindi fai clic con il pulsante destro del mouse e seleziona Visualizza codice dal menu di scelta rapida.
3. Nel Microsoft Visual Basic, Applications Edition finestra, copia il codice VBA sottostante e incolla tra i file Sottotitoli privati ed End Sub linee in Code finestra.
Codice VBA: salva come funzione per sovrascrivere automaticamente il 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 il altro + Q tasti per uscire da Microsoft Visual Basic, Applications Edition finestra. E disattiva il Modalità di progettazione sotto il Costruttori scheda.
5. Fare clic sul pulsante di comando, quindi su a Salva con nome si apre la finestra di dialogo, selezionare una cartella per salvare questa cartella di lavoro, quindi fare clic su Risparmi pulsante.
Se esiste una cartella di lavoro con lo stesso nome nella cartella di destinazione, verrà sovrascritta automaticamente con la cartella di lavoro corrente direttamente senza richiesta.
Articoli correlati:
- Come salvare un foglio di lavoro come file PDF e inviarlo tramite posta elettronica come allegato tramite Outlook?
- Come salvare un nome file Excel con timestamp?
- Come salvare, 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 il salvataggio come in Excel?
I migliori strumenti per la produttività in ufficio
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...
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!