export naar csv

Status
Niet open voor verdere reacties.

arnoo7

Gebruiker
Lid geworden
24 nov 2014
Berichten
79
Ik moet uit een groter bestand 1 van de werkbladen exporteren naar een csv bestand. Dit doe ik door dat blad te kopiëren naar een nieuw excel bestand en deze vervolgens op te slaan (op mijn buroblad).

Als ik deze stappen met de hand doorloop en ik open daarna het csv bestand dan geeft het de data keurig in de kolommen weer. Dit is ook de bedoeling. Als ik echter dezelfde stappen doorloop middels een macro en ik open het bestand dan geeft hij alle data weer in kolom A met komma's gescheiden.

Ik weet dat ik daarna dit wel kan corrigeren met Gegevens naar kolommen en dan opnieuw opslaan. Maar zou graag willen dat het in 1 keer goed gaat. Weet iemand waarom de handmatige methode een ander resultaat oplevert dan de macro, cq hoe ik dit kan corrigeren?

Hierbij even een vereenvoudigd proefbestandje.

Arno
 

Bijlagen

Maak er eens dit van:
Code:
    ActiveSheet.SaveAs Filename:="H:\Buroblad\test.csv", FileFormat:= _
        xlCSV, CreateBackup:=False[COLOR="#FF0000"], Local:=True[/COLOR]
 
Laatst bewerkt:
Tja, je moet er maar opkomen :d

Werkt perfect, dank je!!
 
Graag gedaan :)
Je geeft daarmee in dit geval aan VBA door dat de lokale instelling voor het veldscheidingsteken moet worden gebruikt. Anders wordt de US standaard gebruikt.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan