Wie nutzt man die Funktion „Speichern unter“, um eine vorhandene Datei in Excel automatisch zu überschreiben?
Beim Speichern einer Excel-Arbeitsmappe in einem Neuer Ordner erscheint eine Aufforderungsbox wie im folgenden Screenshot dargestellt, falls bereits eine Arbeitsmappe mit demselben Namen im Ordner vorhanden ist. Wie kann die vorhandene Datei ohne Warnmeldung automatisch überschrieben werden? Die in diesem Artikel beschriebene Methode kann Ihnen dabei helfen.
Funktion „Speichern unter“ zur automatischen Überschreibung vorhandener Dateien mithilfe von VBA-Code
Wenn Sie eine Arbeitsmappe unter einem neuen Namen speichern und dabei die vorhandene Datei in Excel automatisch überschreiben möchten, gehen Sie bitte wie folgt vor.
1. Erstellen Sie zunächst eine Befehlsschaltfläche, um die Funktion „Speichern unter“ in Ihrem Arbeitsblatt auszulösen. Klicken Sie dazu auf Entwicklertools > Einfügen > Befehlsschaltfläche (ActiveX-Steuerelement). Siehe Screenshot:
2. Zeichnen Sie eine Befehlsschaltfläche in Ihr Arbeitsblatt. Klicken Sie dann mit der rechten Maustaste darauf und wählen Sie im Kontextmenü Code anzeigen.
3. Fügen Sie im Fenster Microsoft Visual Basic für Applikationen den folgenden VBA-Code zwischen die Zeilen Private Sub und End Sub im Code-Fenster ein.
VBA-Code: Funktion „Speichern unter“ zur automatischen Überschreibung vorhandener Dateien
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. Drücken Sie die Tastenkombination Alt+Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen. Deaktivieren Sie anschließend den Entwurfsmodus unter der Registerkarte Entwicklertools.
5. Klicken Sie auf die Befehlsschaltfläche. Daraufhin öffnet sich das Dialogfeld Speichern unter. Wählen Sie einen Ordner aus, um diese Arbeitsmappe zu speichern, und klicken Sie dann auf die Schaltfläche Speichern.
Falls im Zielordner bereits eine Arbeitsmappe mit demselben Namen vorhanden ist, wird sie automatisch – ohne Rückfrage – durch die aktuelle Arbeitsmappe überschrieben.
Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Verwandte Artikel:
- Wie speichert man ein Arbeitsblatt als PDF-Datei und sendet es als E-Mail-Anhang über Outlook?
- Wie benennt man eine Excel-Datei beim Speichern automatisch mit einem Zeitstempel?
- Wie speichert oder exportiert man mehrere bzw. alle Arbeitsblätter als separate CSV- oder Textdateien in Excel?
- Wie kann man die Optionen „Speichern“ und „Speichern unter“ in Excel deaktivieren oder deren Nutzung untersagen?
- Wie kann man das Speichern der Arbeitsmappe deaktivieren, während „Speichern unter“ weiterhin erlaubt bleibt?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins