Qlik Community

QlikView App Dev

Discussion Board for collaboration related to QlikView App Development.

Announcements
QlikWorld online is next week! REGISTER NOW
cancel
Showing results for 
Search instead for 
Did you mean: 
souadouert
Specialist
Specialist

Type Mismatch on copyObjectsToExcelSheet

i used this script to copy table to excel

Sub export_situation()

set val=ActiveDocument.Fields("souad").GetPossibleValues

for i=0 to val.Count-1

ActiveDocument.Fields("souad").Select (val.Item(i).Text)

set objagenceClient = ActiveDocument.GetSheetObject("tablesouad")

sheetname=val.Item(i).Text

Dim aryExport(6,3)

aryExport(i,0) = "tablesouad"

aryExport(i,1) = val.Item(i).Text

aryExport(i,2) = "A1"

aryExport(i,3) = "data"

Dim objExcelWorkbook 'as Excel.Workbook

Set objExcelWorkbook = copyObjectsToExcelSheet(ActiveDocument, aryExport)

next

end Sub

but i have this error

Capture.PNG

1 Solution

Accepted Solutions
marcus_sommer
MVP & Luminary
MVP & Luminary

Your code is incomplete. Take here a look into the origin posting: QlikTip #32: Exporting multiple QV objects to a single Excel document.

- Marcus

View solution in original post

3 Replies
marcus_sommer
MVP & Luminary
MVP & Luminary

Your code is incomplete. Take here a look into the origin posting: QlikTip #32: Exporting multiple QV objects to a single Excel document.

- Marcus

bomedic16
Creator
Creator

Hallo Markus,

ich nutze das Script schon eine Weile und habe es nun neu in eine qvw integriert und erhalte nun die selbe Fehlermeldung. Habe auch schon auf ganz rudimentär reduziert. Es läuft einfach nicht. In mehreren anderen Apps schon. Auch die original qlikblog_ExportToMultipleExcelSheets.qvw läuft.

In meiner "neuen" App nicht. Dort ist auch sonst kein VBA "verbaut".

1:1 aus der Quelle kopiert:

sub test
'// Array for export definitions
Dim aryExport(0,3)

aryExport(0,0) = "objSalesPerYearAndRegion"
aryExport(0,1) = "Sales per Region a. Year"
aryExport(0,2) = "A1"
aryExport(0,3) = "data"

Dim objExcelWorkbook 'as Excel.Workbook
Set objExcelWorkbook = copyObjectsToExcelSheet(ActiveDocument, aryExport)
end sub

und eine Tabelle unter Objekt-ID als "objSalesPerYearAndRegion" benannt.

Gibt es in Qlikview noch irgendwo eine Einstellung?

bomedic16
Creator
Creator

Hat sich erledigt. Alles gefunden und müsste un laufen.... der Fehler saß vor dem PC 😉