Skip to main content
Announcements
Have questions about Qlik Connect? Join us live on April 10th, at 11 AM ET: SIGN UP NOW
cancel
Showing results for 
Search instead for 
Did you mean: 
johann_bauer
Partner - Contributor III
Partner - Contributor III

Export to CSV with quotation marks

Hi Guys,

i need to Export a Tabel to a CSV File. I made a VB Script

set sObject = ActiveDocument.GetSheetObject("TB02")

sObject.Export "C:\users\\TestFile.csv", ","

Well this works fine but i need quotation marks around the values.

I found a lot of threads about the delimiter, but are there any parameter to add quotes to the value?

KR

Johann

1 Solution

Accepted Solutions
marcus_sommer

There are several possibilities which you could try - storing these data per store-statement within the script, switching to a different export-call like ExportEX or maybe if it's a rather simple table you could add the quotes to each value like: '"' & sum(value) & '"' - whereby I believe you will rather need another workaround and write your data into a file. Here are an example how to loop through a table and how to write values into a text-file and here you could manipulate the output like you need:

Re: Export to Excel macro (no field grouping)

Re: Scan of scripts in .qvw files

- Marcus

View solution in original post

7 Replies
marcus_sommer

There are several possibilities which you could try - storing these data per store-statement within the script, switching to a different export-call like ExportEX or maybe if it's a rather simple table you could add the quotes to each value like: '"' & sum(value) & '"' - whereby I believe you will rather need another workaround and write your data into a file. Here are an example how to loop through a table and how to write values into a text-file and here you could manipulate the output like you need:

Re: Export to Excel macro (no field grouping)

Re: Scan of scripts in .qvw files

- Marcus

johann_bauer
Partner - Contributor III
Partner - Contributor III
Author

Hi Marcus,

I tried to use your Method with '"' & sum(value) & '"' and in qlikview it looks good.

qwv.png

But if i export it via a Makro, i get everytime 3 Quotes .

"""roboter""",timeIntervalListAnfang,typebits,aktuellerTag,targetFolder,pathRawData,pathRDSData,intervallTyp

"""KA2M41_03R03""","""03.02.2014""","""PLC_do_Typbit_03""","""10.08.2016""","""\\...ta\TargetFolder""","""\\.....ta\RawData""","""\\...SData""","""beliebig"""

I also tried it with a chr(34) but it didnt worked either.

I use following vba Script to create the csv.

sObject.Export "C:\users...p\TestFile.csv",","

Any other ides how to get only 1 Quote?

marcus_sommer

I have feared that this happened than it's the same behaviour like by storing values with enclosing quotes within txt-files. I remember on a solution which used double/triple/quadruple quotes to get rid of the automatically logic of adding quotes to quotes.

Another way is like above mentioned to write these data directly like in this example:

sub CSVEportWithQuotes

set table = ActiveDocument.GetSheetObject( "TB14" )

for RowIter = 0 to table.GetRowCount-1

    for ColIter =0 to table.GetColumnCount-1

        set cell = table.GetCell(RowIter,ColIter)

        if ColIter < table.GetColumnCount-1 then vDelimiter = "," else: vDelimiter = ""

        vContent = vContent & """" & cell.Text & """" & vDelimiter

    next

    vContent = vContent & chr(10)

next

msgbox vContent

set fso = CreateObject("Scripting.FileSystemObject")

set File = fso.OpenTextFile("\\YourServer\d\Test.csv", 2, true)

File.Writeline vContent

File.Close

end sub

- Marcus

johann_bauer
Partner - Contributor III
Partner - Contributor III
Author

Hi Marcus,

thank you for that vba Script.

It works perfectly, just does what i need.

Kind Regards

Johann

hirenjadiya
Partner - Contributor III
Partner - Contributor III

Hi Marcus,

We have a similier situation like Johann.

I have 2 questions over here

1. The above macro will run on server side or on client side?

2. Is the above macro independent of OS. Meaning will it run on MAC?

Thanks in advance.

Regards,

Hiren Jadiya

marcus_sommer

I never tried it on the server side else only with the desktop client on the server or the local machine or with the IE plugin. Regarding to the MAC I don't know if MAC supports VBS - AFAIK VBA is supported by using MS Office for MAC but if it includes all necessary libraries for VBS ... ?

- Marcus

VivenReddy
Partner - Creator
Partner - Creator

Hi Hiren

Were you able to get this working in Accesspoint?

Its working on the desktop client but not with accesspoint.

Regards

Viven