MACRO : Improptu report to Excel 1

[JackONeill]

Hello,

Is it possible to run a macro that open an impromptu report and save it as an excel File?

cya

 

[kdemulder]

Here's what I used in the macro for that:

'Open Impromptu
Set objApp = CreateObject("CognosImpromptu.Application")
trueName = path & fileName & ".imr"
Set objRep = objApp.OpenReport(trueName)
strExcelFileName = path & fileName
'Save As Excel
objRep.ExportExcel strExcelFileName & ".xls"
objRep.CloseReport
objApp.Quit
Set objApp = Nothing
Set objRep = Nothing

Couple of warnings:
* This is for 7.1!
* make a variable "path" and "filename" and give them the appropriate values
* there is a difference when you save it WITH format. See the CognosScript Editor Help for that.