Wie verwende ich die Application-Funktion?SaveAs in Excel VBA zum Speichern von Dateien

Die VBA-Programmiersprache (Visual Basic for Applications) verwendet häufig die Application-Funktion, um mit Microsoft Excel zu arbeiten.SaveAs. Mit dieser Funktion können Sie die aktive Excel-Arbeitsmappe unter einem neuen Namen oder in einem anderen Format speichern. Diese Speicherung kann nützlich sein, wenn Sie eine Kopie einer Datei erstellen oder sie zur späteren Verwendung in einem anderen Format speichern möchten.

Application-Funktion.SaveAs wird zusammen mit dem Application-Objekt verwendet, bei dem es sich um eine Instanz von Excel handelt. Es verfügt über mehrere Parameter wie FileName (Dateiname), FileFormat (Dateiformat) und Password (Kennwort für die Datei), die Sie in den entsprechenden Funktionsargumenten festlegen können.

Anwendung der Application-Funktion.SaveAs in Excel VBA ist ziemlich einfach. Zuerst müssen Sie eine Instanz von Excel mithilfe des Befehls Application abrufen. Sie können dann die SaveAs-Funktion für diese Instanz verwenden, um die aktuelle Datei zu speichern. Der folgende Code speichert beispielsweise die aktuelle Excel-Arbeitsmappe unter dem Namen "Neue Datei".xlsx":

VBA

Application.SaveAs FileName:="Neue Datei.xlsx"

Sie können auch das zu speichernde Dateiformat angeben. Wenn Sie beispielsweise eine Datei als CSV (durch Kommas getrennte Werte) speichern möchten, können Sie den FileFormat-Parameter auf xlCSV festlegen. Hier ist ein Beispielcode, der die aktuelle Excel-Arbeitsmappe im CSV-Format speichert:

VBA

Application.SaveAs FileName:="Neue Datei.csv", FileFormat:=xlCSV

Application-Funktion.Mit SaveAs in Excel VBA können Sie nicht nur eine Kopie einer Datei erstellen oder sie in einem anderen Format speichern, sondern auch zusätzliche Funktionen wie Passwortschutz und das Angeben eines Speicherpfads. Mit dieser Funktion können Sie das Speichern von Dateien in Excel vereinfachen und sie in Ihren Makros und VBA-Anwendungen automatisieren.

Wie speichert man Dateien mit der Application-Funktion?SaveAs in Excel VBA?

Application-Funktion.SaveAs in Excel können Sie mit VBA Dateien programmgesteuert speichern. Dies ist besonders nützlich, wenn Sie das Speichern von Dateien mithilfe bestimmter Einstellungen automatisieren möchten.

Um die Application-Funktion zu verwenden.SaveAs, es müssen mehrere Schritte befolgt werden:

1. Definieren eines Workbook-Objekts - dies ist eine Excel-Datei, die Sie speichern möchten. Normalerweise wird dieses Objekt mit einer Variablen definiert. Zum Beispiel:

Dim wb As WorkbookSet wb = ActiveWorkbook

1. Verwenden Sie die SaveAs-Funktion um die Datei zu speichern. Zum Beispiel:

wb.SaveAs "C:\МойФайл.xlsx"

Im obigen Beispiel wird die Datei mit dem Namen "Meine Datei" im Excel-Format (.xlsx) im angegebenen Pfad "С:\МойФайл .xlsx".

Sie können auch zusätzliche Parameter in der SaveAs-Funktion angeben:

• FileFormat - das Dateiformat, in dem Sie speichern möchten. Zum Beispiel:

wb.SaveAs "C:\МойФайл.pdf", FileFormat:=xlTypePDF

In diesem Beispiel wird die Datei im PDF-Format mit dem Namen "Meine Datei" unter dem angegebenen Pfad gespeichert "С:\МойФайл .pdf". Der Parameter FileFormat:=xlTypePDF gibt an, dass die Datei im PDF-Format gespeichert werden soll.

• Password - passwort zum Schutz der Datei. Zum Beispiel:

wb.SaveAs "C:\МойФайл.xlsx", Password:="Пароль"

In diesem Beispiel wird die Datei mit dem Namen "Meine Datei" im Excel-Format (.xlsx) mit dem angegebenen "Passwort".

Die verschiedenen Dateiformate und Werte für FileFormat, Password und andere Optionen finden Sie in der Microsoft Excel VBA-Dokumentation.

Verwenden der Application-Funktion.Mit SaveAs in Excel VBA können Sie Dateien effizient durch Automatisierung speichern. Dies ist besonders nützlich, wenn Sie eine große Anzahl von Dateien mit festgelegten Parametern regelmäßig speichern möchten, was den Workflow erheblich beschleunigen und vereinfachen kann.

Ein Beispiel für die Verwendung der Application-Funktion.SaveAs

Application-Funktion.Mit SaveAs in VBA für Excel können Sie eine Datei mit dem angegebenen Namen und Format speichern. Es kann sehr nützlich sein, wenn Sie den Prozess des Speicherns von Dateien in Excel automatisieren möchten.

Hier ist ein Beispiel für die Verwendung der Application-Funktion.SaveAs:

Sub SaveFile()Dim fileName As StringDim filePath As String' Запрос имени файлаfileName = InputBox("Введите имя файла:")' Проверка, если пользователь не ввел имя файлаIf fileName = "" ThenExit SubEnd If' Запрос пути сохранения файлаfilePath = Application.GetSaveAsFilename(fileName)' Проверка, если пользователь не выбрал путь сохраненияIf filePath = "False" ThenExit SubEnd If' Сохранение файлаActiveWorkbook.SaveAs Filename:=filePathEnd Sub

In diesem Beispiel wird die Application-Funktion verwendet.SaveAs wird verwendet, um die aktive Arbeitsmappe mit dem angegebenen Namen zu speichern und zu speichern. Der Benutzer wird zunächst aufgefordert, einen Dateinamen einzugeben und dann einen Speicherpfad auszuwählen. Wenn der Benutzer keinen Dateinamen eingibt oder keinen Speicherpfad auswählt, wird der Speichervorgang abgebrochen.

Beachten Sie, dass Sie den vollständigen Pfad vor dem Dateinamen angeben müssen, einschließlich der Dateierweiterung (z. B. "C:\Pfad\zu\Datei\Dateiname.xlsx").

Vorsicht: Codebeispiele können Tippfehler enthalten und erfordern eine Überprüfung und Behebung von Fehlern, bevor sie in Ihrer Anwendung verwendet werden.

Anwendungsfunktionsparameter.SaveAs

Application-Funktion.Mit SaveAs in Excel VBA können Sie die aktive Arbeitsmappe mit bestimmten Parametern speichern. Hier sind einige der nützlichsten Parameter, die an diese Funktion übergeben werden können:

Filename: dies ist ein erforderlicher Parameter, der den Pfad und den Namen der Datei angibt, in der die Arbeitsmappe gespeichert werden soll. Zum Beispiel: "С:\Мои dokumente\Meine Datei.xlsx".

FileFormat: dies ist ein optionaler Parameter, der das Dateiformat angibt, in dem die Arbeitsmappe gespeichert werden soll. Zum Beispiel das xlOpenXMLWorkbook für das Format .xlsx oder xlCSV für das CSV-Format. Wenn Sie diese Option nicht angeben, wählt Excel automatisch das Dateiformat aus.

Password: dies ist eine optionale Option, mit der Sie ein Passwort festlegen können, um die Datei zu schützen. Zum Beispiel "mypassword". Wenn Sie diesen Parameter nicht angeben, wird die Datei ohne Kennwort gespeichert.

WriteResPassword: dies ist eine optionale Option, mit der Sie ein Schreibkennwort festlegen können, um die Datei zu schützen. Zum Beispiel "mywriterespassword". Wenn Sie diesen Parameter nicht angeben, wird die Datei ohne Schreibkennwort gespeichert.

ReadOnlyRecommended: Dies ist ein optionaler Boolean-Parameter, der angibt, ob dem Benutzer die Möglichkeit gewährt werden soll, die Datei im schreibgeschützten Modus zu öffnen. Der Standardwert ist False.

CreateBackup: Dies ist ein optionaler Parameter vom Typ Boolean, der angibt, ob die Datei vor dem Speichern gesichert werden soll. Der Standardwert ist False.

Hier ist ein Beispiel für die Verwendung der Application-Funktion.SaveAs mit einigen Parametern:

Sub SaveWorkbook()Dim path As StringDim format As XlFileFormat' Установка значений параметровpath = "C:\Мои документы\Мой файл.xlsx"format = xlOpenXMLWorkbook' Сохранение книгиThisWorkbook.SaveAs Filename:=path, FileFormat:=formatEnd Sub

In diesem Beispiel wird die Arbeitsmappe im angegebenen Pfad und im angegebenen Dateiformat gespeichert.

Praktische Tipps zur Verwendung der Application-Funktion.SaveAs

Application-Funktion.Mit SaveAs in VBA (Visual Basic for Applications) können Sie Dateien in verschiedenen Formaten speichern. Hier sind einige nützliche Tipps zur Verwendung dieser Funktion:

1. Geben Sie den vollständigen Pfad zur zu speichernden Datei an. Wenn Sie SaveAs aufrufen, müssen Sie den vollständigen Pfad der Datei angeben, einschließlich des Dateinamens und der Dateinamenerweiterung. Zum Beispiel, um eine Datei mit dem Namen "data.xlsx" auf dem Desktop müssen Sie den folgenden Pfad angeben: "C:\Users\Имя_Пользователя\Desktop\data .xlsx". Wenn Sie keinen vollständigen Pfad angeben, wird die Datei im aktuellen Verzeichnis gespeichert.

2. Verwenden Sie gültige Zeichen im Dateinamen. Einige Zeichen wie ein Schrägstrich ("/") oder ein Fragezeichen ("?") sind in Dateinamen verboten. Wenn Sie eine Datei mit ungültigen Zeichen im Namen speichern, tritt ein Fehler auf. Stellen Sie sicher, dass der Dateiname nur zulässige Zeichen enthält.

3. Bestimmen Sie das Dateiformat. Die SaveAs-Funktion kann Dateien in verschiedenen Formaten wie Excel, CSV, PDF und anderen speichern. Wenn Sie eine Funktion aufrufen, müssen Sie das gewünschte Format mit dem zweiten Argument der Funktion angeben. Um beispielsweise eine Datei im Excel-Format zu speichern, müssen Sie den xlOpenXMLWorkbook-Wert verwenden.

4. Legen Sie zusätzliche Parameter fest. Die SaveAs-Funktion verfügt über eine Reihe zusätzlicher Parameter, die in einigen Fällen nützlich sein können. Sie können beispielsweise angeben, ob Formeln und Formatierungen in einer Datei gespeichert und gesichert werden sollen. Weitere Informationen zu den verfügbaren Parametern und deren Werten finden Sie in der Dokumentation zur SaveAs-Funktion.

Anmerkung: Diese Tipps helfen Ihnen, die Application-Funktion richtig zu verwenden.Es gibt jedoch andere Möglichkeiten, Dateien zu speichern, z. B. die SaveCopyAs-Funktion und die SaveAs-Methode im Workbook-Objekt. Verwenden Sie die am besten geeignete Methode, abhängig von Ihren Bedürfnissen und Anforderungen.