Öffnen einer CSV in Excel mit VBA und Konvertieren in eine Tabelle schrittweise Anleitung

Microsoft Excel ist ein leistungsfähiges Datenwerkzeug, das viele Funktionen und Funktionen bietet. In einer dieser Funktionen ermöglicht Excel das Öffnen und Verarbeiten von CSV-Dateien mit Visual Basic für Applikationen (VBA). CSV (Comma-Separated Values) ist ein praktisches Format zum Speichern und Übergeben von Tabellendaten, bei dem Werte durch Kommas getrennt sind.

In diesem Artikel werden wir ausführlich untersuchen, wie Sie eine CSV-Datei mit VBA in Excel öffnen und in eine Tabelle konvertieren. Die gute Nachricht ist, dass VBA über alle notwendigen Funktionen verfügt, um diese Aufgabe zu automatisieren, und wir zeigen Ihnen, wie Sie dies in wenigen einfachen Schritten tun können.

Schritt 1: Öffnen Sie den Visual Basic Editor (VBE) in Excel, indem Sie eine Tastenkombination drücken Alt+F11. Dadurch wird ein VBE-Fenster geöffnet, in dem Sie VBA-Code schreiben und bearbeiten können.

Schritt 2: Klicken Sie in VBE mit der rechten Maustaste auf das VBA-Projekt und wählen Sie "Einfügen" -> "Modul". Dadurch wird ein neues Modul erstellt, in das wir unseren Code schreiben werden.

Schritt 3: Schreiben Sie im neuen Modul den folgenden Code:

Sub OpenCSVFile() Dim CSVFilePath As String Dim wb As Workbook ' Bitten Sie den Benutzer, die CSV-Datei CSVFilePath = Application auszuwählen.GetOpenFileName("CSV-Dateien (*.csv), *.csv") ' Wenn der Benutzer eine Datei ausgewählt hat, öffnen Sie sie If CSVFilePath <> "False" Then Set wb = Workbooks.Open(CSVFilePath) ' Konvertieren Sie die Daten in eine wb-Tabelle.Sheets(1).Cells(1, 1).CurrentRegion.Select wb.Sheets.Add wb.Sheets(1).Cells.Copy Destination:=wb.Sheets(2).Cells(1, 1) ' Schließen Sie die CSV-wb-Datei.Close SaveChanges:=False End If End Sub

Dieser Code öffnet ein Dialogfeld, in dem der Benutzer eine CSV-Datei auswählen kann, und öffnet dann die ausgewählte Datei, um ihre Daten in eine Tabelle zu konvertieren. Ein neues Arbeitsblatt wird erstellt und alle Daten werden in das zweite Arbeitsblatt kopiert. Schließlich wird die CSV-Datei geschlossen, ohne die Änderungen zu speichern. Das ist es - wir haben die CSV-Datei erfolgreich mit VBA in Excel geöffnet und in eine Tabelle konvertiert!

Öffnen einer CSV in Excel mit VBA und Konvertieren in eine Tabelle: schrittweise Anleitung

Wenn Sie Daten aus einer Datei importieren müssen .csv in Microsoft Excel und konvertieren Sie es in eine Tabelle, dann können Sie die Vorteile der VBA-Programmiersprache nutzen. Dies wird den Prozess automatisieren und Ihnen Zeit sparen.

Schritt 1: Öffnen Sie Microsoft Excel, und erstellen Sie ein neues VBA-Modul. Sie können dies tun, indem Sie mit der rechten Maustaste auf die Symbolleiste klicken und "Entwickler-Systemsteuerung" auswählen. Fügen Sie dann das neue Modul ein, indem Sie auf die Schaltfläche Einfügen klicken und "Modul" auswählen.

Schritt 2: Fügen Sie den folgenden Code in das VBA-Modul ein:

Sub ImportCSV()Dim FilePath As StringDim DestinationCell As Range' Укажите путь к файлу CSVFilePath = "C:\Путь\к\файлу.csv"' Укажите ячейку, в которой должна быть размещена таблицаSet DestinationCell = ThisWorkbook.Sheets("Лист1").Range("A1")' Откройте файл CSVWorkbooks.OpenText Filename:=FilePath, Origin:=xlWindows, _StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=False, Comma:=True, Space:=False, _Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), _Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1)), _TrailingMinusNumbers:=True' Копируйте данные из файла CSV и вставьте их в таблицуSelection.CopyDestinationCell.PasteSpecial Paste:=xlPasteValuesAndNumberFormats' Закройте файл CSV без сохранения измененийActiveWorkbook.Close SaveChanges:=FalseEnd Sub

Schritt 3: Nehmen Sie die erforderlichen Änderungen am Code vor. In Zeile filePath = "С:\Путь\к\файлу .csv" geben Sie den Pfad zu Ihrer Datei an .csv. In Zeile Set DestinationCell = ThisWorkbook.Sheets("Blatt1").Range("A1") geben Sie das Blatt und die Zelle an, in die die Tabelle eingefügt werden soll.

Schritt 4: Starten Sie das Makro, indem Sie auf die Schaltfläche "Ausführen" klicken. Datei.die CSV wird geöffnet und die Daten werden automatisch in eine Tabelle in der angegebenen Zelle konvertiert.

Beispiel: Wenn Ihre Datei ist .die csv enthält andere Trennzeichen als das Komma, Sie müssen die entsprechenden Änderungen an den Prozedurparametern vornehmen Workbooks.OpenText .

Jetzt haben Sie eine schrittweise Anleitung zum Öffnen der Datei .csv in Excel verwenden Sie VBA und konvertieren Sie es in eine Tabelle. Auf diese Weise können Sie Daten schnell und effizient in Microsoft Excel importieren und mit ihnen arbeiten.

Schritt 1: Öffnen des VBA-Editors

Bevor Sie mit VBA beginnen, um eine CSV-Datei in Excel zu öffnen, müssen Sie den VBA-Editor öffnen. Führen Sie dazu die folgenden Schritte aus:

1. Öffnen Sie Excel und wählen Sie die Datei aus, in der Sie die csv öffnen möchten.
2. Klicken Sie im oberen Bereich auf die Registerkarte Entwickler. Wenn die Registerkarte "Entwickler" nicht vorhanden ist, müssen Sie sie aktivieren. Gehen Sie dazu zu Datei -> Optionen -> Excel-Optionen -> Menübandoptionen -> Aktivieren Sie das Kontrollkästchen Entwickler und klicken Sie auf OK.
3. Suchen Sie auf der Registerkarte "Entwickler" die Gruppe "Code" und klicken Sie auf die Schaltfläche "VBA-Editor".

Nachdem Sie diese Schritte ausgeführt haben, wird der VBA-Editor geöffnet, in dem Sie Code schreiben können, um die CSV-Datei zu öffnen und sie in eine Excel-Tabelle zu konvertieren.

Schritt 2: Erstellen eines neuen VBA-Moduls

Um mit der Verwendung von VBA in Excel zu beginnen, müssen Sie ein neues Modul im Programm erstellen. Ein Modul ist eine Datei, in der Sie VBA-Code speichern und ausführen können.

Gehen Sie folgendermaßen vor, um ein neues Modul in Excel zu erstellen:

1. Öffnen Sie das Excel-Dokument, in dem Sie das Modul hinzufügen möchten.

2. Drücken Sie eine Tastenkombination Alt + F11. Dadurch wird das Fenster "VBA-Editor" geöffnet.

3. Suchen Sie im VBA-Editor die Projektsymbolleiste mit einer Datei- und Ordnerhierarchie. Darin müssen Sie eine Datei mit der Erweiterung auswählen. "xlsm" (für Makrodateien).

4. Klicken Sie mit der rechten Maustaste auf diese Datei und wählen Sie Einfügen -> Modul. Auf diese Weise erstellen Sie ein neues Modul in der ausgewählten Datei.

Nachdem Sie diese Schritte ausgeführt haben, sollten Sie ein neues Modul im Fenster "VBA-Editor" sehen. Darin können Sie Ihren Code in VBA schreiben und in Excel verwenden.

Schritt 3: Schreiben von Code zum Öffnen einer CSV-Datei

Um eine CSV-Datei in Excel zu öffnen und in eine Tabelle zu konvertieren, müssen wir Code in VBA schreiben.

Öffnen Sie zuerst den Visual Basic-Editor, indem Sie Alt + F11 drücken.

Wählen Sie dann das Excel-Projekt im Projekt-Explorer-Fenster aus.

Klicken Sie mit der rechten Maustaste auf das Excel-Projekt und wählen Sie Insert -> Module aus dem Kontextmenü aus.

Schreiben wir in das Codefenster, das angezeigt wird, den folgenden Code:

Sub OpenCSVFile()Dim wb As WorkbookDim ws As WorksheetDim fileDialog As fileDialogDim filePath As String'Определяем объект диалога выбора файлаSet fileDialog = Application.fileDialog(msoFileDialogFilePicker)'Открываем диалоговое окно для выбора csv файлаWith fileDialog.Title = "Выберите csv файл".Filters.Clear.Filters.Add "CSV Files", "*.csv"'Если пользователь выбрал файлIf .Show = -1 Then'Получаем путь к выбранному файлуfilePath = .SelectedItems(1)'Открываем выбранный csv файлSet wb = Workbooks.Open(filePath)'Устанавливаем активным первый лист в открытом файлеSet ws = wb.Sheets(1)'Делаем таблицу на листе печатнойws.ActivateActiveWindow.View = xlPageBreakPreview'Преобразуем таблицу в диапазон данных и устанавливаем форматws.UsedRange.SelectSelection.CopySelection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=FalseCells.Select'Автоизменение ширины столбцовColumns.AutoFitEnd IfEnd With'Освобождаем ресурсыSet fileDialog = NothingSet ws = NothingSet wb = NothingEnd Sub

Nachdem wir den Code geschrieben haben, speichern wir ihn und schließen den Visual Basic Editor.

Um die CSV-Datei nun in eine Tabelle zu öffnen und zu konvertieren, müssen Sie die folgenden Schritte ausführen:

1. Öffnen Sie die Registerkarte Entwickler in Excel, indem Sie mit der rechten Maustaste auf die Werkzeugleiste klicken und die Option Schnellzugriffsleiste anpassen auswählen. Wählen Sie im daraufhin angezeigten Dialogfeld die Registerkarte Entwickler aus und klicken Sie auf OK.
2. Klicken Sie auf der Registerkarte Entwickler auf die Schaltfläche "Macros".
3. Wählen Sie im angezeigten Fenster das Makro "OpenCSVFile" aus und klicken Sie auf die Schaltfläche "Ausführen".
4. Wählen Sie die CSV-Datei im Dialogfeld aus, das sich öffnet.
5. Nachdem Sie eine Datei ausgewählt haben, öffnet Excel sie und konvertiert den Inhalt in eine Tabelle.

Jetzt können Sie einfach CSV-Dateien öffnen und sie mit geschriebenem Code in Tabellen konvertieren.

Schritt 4: Konvertieren von Daten in eine Tabelle

Nach dem Öffnen einer CSV-Datei in Excel mit VBA werden die Rohdaten aus der Datei im Klartext dargestellt, unorganisiert und unbequem zu bedienen. Um verschiedene Datenoperationen durchführen und analysieren zu können, müssen Sie die Daten in ein tabellarisches Format konvertieren.

Dazu können Sie die integrierten Excel-Funktionen verwenden oder Ihren eigenen VBA-Code schreiben, der die Konvertierung durchführt. In dieser Anweisung wird ein Beispiel für die Verwendung der integrierten Excel-Funktion zum Konvertieren von Daten in eine Tabelle beschrieben.

Wählen Sie zunächst die Zelle aus, in die Sie die Tabelle einfügen möchten, und geben Sie die folgende Formel ein:

=ТЕКСТ($A$1;"@")

Wobei "$A$1" die Zelle ist, die die Daten aus der CSV-Datei enthält. Ersetzen Sie diesen Verweis durch die Zelle, in der sich die Daten befinden.

Kopieren Sie dann diese Formel in alle Zellen, in denen sich die Tabellendaten befinden sollen. Drücken Sie die Eingabetaste, um die Formel auf alle Zellen anzuwenden. Dadurch werden die Daten aus dem Textformat in eine Tabelle konvertiert.

Die Daten aus der CSV-Datei werden nun als Tabelle in Excel angezeigt. Sie können alle Funktionen von Excel nutzen, um mit Daten zu arbeiten, einschließlich Sortieren, Filtern und Diagrammen.

Glückwunsch! Sie haben erfolgreich Daten aus einer CSV-Datei mit VBA in eine Tabelle in Excel konvertiert. Jetzt können Sie mit den Daten weiterarbeiten und die erforderlichen Analysen und Manipulationen durchführen.