MS Excel Spalte exportieren

Hi.

Ich habe in einer Excel Tabelle etwa 400 Einträge untereinander. Ich möchte nun all diese Einträge irgendwie dahingehend exportieren (nur eine Spalte), dass sie nur durch ein Komma getrennt sind und alle in einer Zeile stehen. Von mir aus können am Ende auch alle in einer Zelle stehen … nur brauche ich sie halt alle zuvor untereinander stehenden Einträge nun hintereinander … wie kann ich das realisieren?

btw: ist recht dringend :smile:

byE : dirk.einecke
www.dreamworker.de

Hi Dirk,

folgendes Makro funktioniert dann, wenn keine Freizeile enthalten ist:

sub export()
Zeile = 1
open „Ausgang.csv“ for output as #1
while Cells(Zeile,1).formula „“
print#1, Cells(Zeile,1).value
Zeile = Zeile + 1
wend
close #1
end sub

Wenn in den Zellen Texte anstatt Zahlenwerte sind, dann muß in dem print#-Befehl ein .formula anstatt dem .value übergeben werden.

Hoffe geholfen zu haben.

Gruß

Uwe

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hi.

Vielen Dank für Deine Hilfe.

byE : dirk.einecke
www.dreamworker.de