3
Access Datenexport Problem
Hallo Gemeinschaft,
durch einen Export in dieser Art erhalte ich ein csv file
dort sind alle Daten in Anführungszeichen eingebettet - wie bekomme ich das hin (nachträglich), dass diese nicht auftauchen
durch einen Export in dieser Art erhalte ich ein csv file
DoCmd.TransferText acExportDelim, "Mietabrechnung2022", "Mietabrechnung", "S:\abrechnung\Mietabrechnung" & Ablagedatum & ".csv", False dort sind alle Daten in Anführungszeichen eingebettet - wie bekomme ich das hin (nachträglich), dass diese nicht auftauchen
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 6259115692
Url: https://administrator.de/contentid/6259115692
Printed on: May 2, 2024 at 04:05 o'clock
3 Comments
Latest comment
sieht dann so aus
"test";"DE5435435435345345";"geno564577";"373,80";"CCS";"66";"Mietabrechnung:N8 zur Gutschriftnummer:59"
"test";"DE5435435435345345";"geno564577";"373,80";"CCS";"66";"Mietabrechnung:N8 zur Gutschriftnummer:59"
Moin.
Die Anführungszeichen haben schon einen wichtigen Sinn, wenn du bspw. in den Text ein ";" schreiben würdest würde deine CSV nämlich eine zusätzliche Spalte bekommen und schon machts Peng !
Ersetzen kann man immer mit dem FilesystemObject
Aber wie gesagt gefährlich wenn man Felder hat indem ein User dann den Delimiter eingeben kann und diese nicht vorher ersetzt.
Cheers briggs
Die Anführungszeichen haben schon einen wichtigen Sinn, wenn du bspw. in den Text ein ";" schreiben würdest würde deine CSV nämlich eine zusätzliche Spalte bekommen und schon machts Peng !
Ersetzen kann man immer mit dem FilesystemObject
strPath = "S:\abrechnung\Mietabrechnung" & Ablagedatum & ".csv"
DoCmd.TransferText acExportDelim, "Mietabrechnung2022", "Mietabrechnung", strPath, False
Set fso = CreateObject("Scripting.FileSystemObject")
inhalt = fso.OpenTextFile(strPath,1,False).ReadAll
fso.OpenTextFile(strPath,2,False).Write Replace(inhalt,"""","",1,-1,1) Cheers briggs
super cool - und danke für den Hinweis - werde das berücksichtigen
