• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

csv maken

Status
Niet open voor verdere reacties.
E

excelteun

Nieuwe gebruiker
Lid geworden
20 mrt 2010
Berichten
2
Hallo, ik probeer een csv bestand op te maken uit een bestaand excel-bestand;
een deel hiervan:
5.78438,52.22155,"033A0002"
5.84624,52.23131,"033A0003"
5.87685,52.23253,"033A0005
5.84268,52.16993,"033A0007
5.82665,52.17449,"033A0009
5.83308,52.17410,"033A0010

De eerste 2 regels zijn gereed, vanaf regel 3 moet alleen achteraan nog een " geplaatst worden. En dat niet alleen in deze 4 regels, maar nog 300. Hoe kan ik dit automatiseren in Excel of liever nog in notepad.

Dank je wel
 
Code: 
Sub tst()
sq = Cells(1).CurrentRegion
For i = 1 To UBound(sq)
    sq(i, 1) = sq(i, 1) & """"
Next
Cells(1).Resize(UBound(sq), UBound(sq, 2)) = sq
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan