topic Macro Export to Excel will Overwrite Data without Warning. in QlikView

Macro Export to Excel will Overwrite Data without Warning.

hykal1993 — Wed, 07 Nov 2018 07:44:32 GMT

I'm using Macro below to export the excel file to a specific folder. However, it will overwrite if there's existing file without warning. How can I create a warning? Thanks.

'Main

sub exportToExcelMain

Dim path

path = getExportPathMain()

dim o

Set o = ActiveDocument.GetSheetObject("Main")

o.ExportBiff path

Set o = nothing

msgbox("Export to " & path & " succeeded!")

end sub

function getExportPathMain

getExportPathMain = ActiveDocument.Variables("Main Export").GetContent.String

end function

Re: Macro Export to Excel will Overwrite Data without Warning.

m_woolf — Wed, 07 Nov 2018 12:53:34 GMT

Google vbscript check if file exists

Re: Macro Export to Excel will Overwrite Data without Warning.

andrey_krylov — Wed, 07 Nov 2018 13:26:36 GMT

Hi. Try this

sub exportToExcelMain

Dim path

path = getExportPathMain()

Set fso = CreateObject("Scripting.FileSystemObject")

If fso.FileExists(path) Then

If MsgBox(path & " already exists. Do you want to replace it?", vbYesNo, "Confirm Save As") = vbNo Then

Exit sub

End If

dim o

Set o = ActiveDocument.GetSheetObject("Main")

o.ExportBiff path

Set o = nothing

msgbox("Export to " & path & " succeeded!")

end sub

function getExportPathMain

getExportPathMain = ActiveDocument.Variables("Main Export").GetContent.String

end function

Re: Macro Export to Excel will Overwrite Data without Warning.

hykal1993 — Thu, 08 Nov 2018 12:06:21 GMT

‌thank you soo much!!