VBA Speichern unter

Excel VBA Speichern unter

Die VBA- Methode Speichern unter wird verwendet, um die Excel-Datei an einem bestimmten Speicherort zu speichern. Um die Arbeitsmappe mit VBA-Code zu speichern, verwenden wir das Objekt Arbeitsmappe mit der Funktion Speichern unter.

Nach all der harten Arbeit, die wir in der Arbeitsmappe geleistet haben, speichern wir sie, nicht wahr? Es ist schmerzhaft, die Daten zu verlieren, an denen wir gearbeitet haben. Wir haben zwei Arten von Speicherungen in Excel oder einer beliebigen Datei, eine ist "Speichern" und eine andere ist "Speichern unter". Strg + S ist die beliebte Tastenkombination als Strg + C & Strg + V auf der ganzen Welt. Das Konzept „Speichern unter“ ist jedoch nicht so bekannt . In der regulären Arbeitsblatt-Tastenkombination zum Speichern unter ist die Datei die Taste F12 . Auch in VBA können wir die Datei als „ Speichern unter “ speichern .

Was macht VBA Save As Function?

Es ist eine allgemeine Aufgabe, Arbeit im Automatisierungsprozess zu sparen. Nach all der Arbeit möchten wir die Datei speichern.

Arbeitsmappen ("Sales 2019.xlsx"). Speichern

Dieser Code las die Arbeitsmappe mit dem Namen "Sales 2019.xlsx" zum Speichern.

In ähnlicher Weise kann die Replikation der Arbeitsmappe, an der wir arbeiten, mithilfe der Methode "Speichern unter" erstellt werden.

  • Dateiname: Wie lautet der Name der Datei, die Sie angeben möchten? Dies sollte mit dem Pfad des Dateiordners kombiniert werden.
  • Dateiformat: Was sollte das Format für die Datei sein, die Sie speichern.
  • Passwort: Möchten Sie ein Passwort für die Speicherdatei angeben?
  • Res-Passwort schreiben: Erwähnen Sie das reservierte Passwort für die Arbeitsmappe.

Ich denke, diese Parameter reichen aus, um die Save As-Methode zu verstehen.

Wie verwende ich die Funktion Speichern unter?

Sie können diese VBA-Vorlage "Als Excel speichern" hier herunterladen - VBA-Vorlage "Als Excel speichern"

Beispiel 1

Wir speichern die Arbeitsmappe richtig, daher ist es wichtig, den Namen der Arbeitsmappe und ihre Erweiterung anzugeben, um die Methode Speichern unter zu verwenden. Erwähnen Sie also die Arbeitsmappe, die Sie speichern.

Code:

Sub SaveAs_Example1 () Arbeitsmappen ("Sales 2019.xlsx"). End Sub

Verwenden Sie nun die Methode Speichern unter.

Code:

 Sub SaveAs_Example1 () Arbeitsmappen ("Sales 2019.xlsx"). SaveAs End Sub

Identifizieren Sie nun, wo Sie speichern möchten.

Code:

 Sub SaveAs_Example1 () Arbeitsmappen ("Sales 2019.xlsx"). SaveAs "D: \ Artikel \ 2019 End Sub

Setzen Sie nun einen Backslash und geben Sie den Dateinamen nach Ihren Wünschen mit einer Dateierweiterung ein.

Code:

 Sub SaveAs_Example1 () Arbeitsmappen ("Sales 2019.xlsx"). SaveAs "D: \ Artikel \ 2019 \ My File.xlsx" End Sub

Erwähnen Sie nun das Dateiformat als "xlWorkbok".

Code:

 Sub SaveAs_Example1 () Arbeitsmappen ("Sales 2019.xlsx"). SaveAs "D: \ Artikel \ 2019 \ My File.xlsx", FileFormat: = xlWorkbook End Sub

Ok, wir sind fertig, es wird die Datei in Laufwerk D> Ordnername (Artikel)> Unterordnername (2019) gespeichert.

Beispiel 2

Speichern Sie alle geöffneten Arbeitsmappen

Angenommen, Sie arbeiten mit 10 Arbeitsmappen auf Ihrem Computer. Sie möchten eine Sicherungskopie dieser Arbeitsmappen erstellen, indem Sie sie als Kopie auf dem Computer speichern. Wenn Sie mit mehr als einer Arbeitsmappe arbeiten möchten, müssen Sie die Schleifen verwenden.

Mit dem folgenden Code können Sie alle Arbeitsmappen als Kopie speichern.

Code:

 Sub SaveAs_Example2 () Dim Wb als Arbeitsmappe für jede Wb in Arbeitsmappen ActiveWorkbook.SaveAs "D: \ Articles \ 2019 \" & ActiveWorkbook.Name & ".xlsx" 'Ändern Sie den Dateipfad Next Wb End Sub

Wenn Sie Ihren eigenen Ordnerpfad auswählen möchten, können Sie diesen Code verwenden.

Code:

 Sub SaveAs_Example3 () Dim FilePath As String FilePath = Application.GetSaveAsFilename ActiveWorkbook.SaveAs Dateiname: = FilePath & ".xlsx", FileFormat: = xlOpenXMLWorkbook End Sub

Sobald Sie diesen Code mit der Taste F5 oder manuell ausführen, werden Sie aufgefordert, den Pfad des Zielordners auszuwählen, auszuwählen und auf OK zu klicken. Die Datei wird gespeichert.