Office: (Office 2013) Export Excel in csv per VBA

Hallo Zusammen,

ich benötige für ein kleines Projekt einen CSV-Export aus einer Exceldatei, welcher eine Matrix-Tabelle in eine CSV-Datei ausgibt. Für jede verfügbare Matrix soll eine separate Zeile in der CSV-Datei erzeugt werden.

Ausgangssituation:
Aus einer ERP-Software wird eine Ausschreibung in eine CSV-Datei exportiert (siehe X300006_Import.csv). Diese CSV-Datei wird dann in die Excel-Datei (Vorlage Aufmaß1.4.xltm) importiert. Hierzu gibt es bereits einen VBA-Import. In der Matrix-Tabelle (Aufmaß-Blatt) kann nun das Aufmaß pro Objekt (z.B. Raum) erfasst werden.

Ziel ist es nun das erfasste Aufmaß zurück in das ERP-System zu importieren. Hierzu wird wiederum eine CSV-Datei benötigt, welche wie die beigefügte Datei „X300006_Export_SOLL.csv“ aufgebaut sein muss.

Von der Logik her müsste der Export folgt funktionieren:

1. CSV-Datei enthält folgende Überschrift „Positionsnummer;Aufmaßmenge;Stichwort“. Für den Export sind die Felder zwecks Zuordnung beim Import in das ERP-System notwendig.
2. Ist in der Objektspalten („Raum 1“ , „Raum 2“ ,..) ein Wert hinterlegt, muss pro Objekt eine separate Zeile in der CSV-Datei erzeugt werden. Die CSV-Date besteht aus 3 Feldern

a) Spalte „Positionsnummer“ -> Hier muss die Positionsnummer der jeweiligen Zeile 1:1 übernommen werden. (ggf.auch führende Nullen)
b) Spalte „Aufmaßmenge“ -> Menge aus der Spalte des Objekts
c) Spalte „Stichwort“ -> das jeweilige Objekt

Den Import konnte ich per VBA umsetzen. Wie ich aber den CSV-Export per VBA umsetzen kann, weiß ich leider nicht.

Sollte jemand eine Herausforderung suchen und mir den VBA-Code zur Verfügung stellen könnte, würde ich mich sehr freuen.

Vielen Dank

 

Hallo,

in der beiliegenden Excel-Datei habe ich im Arbeitsblatt "IMPORT" einen zweiten Button "Nach CSV-Datei exportieren" hinzugefügt.
Betätigt man diesen Button, erscheint ein "Speichern-Als"-Dateidialog, wo man eine Datei (Pfad/Namen) festlegen kann, in die dann die Zellen des Blattes "Aufmaß" ausgegeben werden, die in den Raum-Spalten einen Zahleneintrag aufweisen.
Dieser Zahleneintrag in der Raum-Spalte wird so ausgegeben, wie er auch im Excel-Blatt erscheint (betrifft ein eventuelles Dezimalzeichen - ob Punkt oder Komma).

 

Hallo Anton,

vielen Dank für die Vorlage. Funktioniert super! Echt Klasse.

Gruß Daniel