Skip to main content
cancel
Showing results for 
Search instead for 
Did you mean: 
amilafdo
Creator
Creator

Send object to excel automatically

Hi,

Can anyone guide me, how to export QV object to excel automatically.

Thanks

Amila

17 Replies
ashfaq_haseeb
Champion III
Champion III

Hi,

Can you be more clear.

You can send to excel by right on object and click send to excel.

Regards

ASHFAQ

Anonymous
Not applicable

Hi Amila,

There is an option to send excel by clicking on an icon 'XL' in up right corner of objectz....second thng is u can make use of macro to do so...and give an action according to ur needz ...

Regardz,

Vaibz...

amilafdo
Creator
Creator
Author

Hi,

I want to schedule some object export to excel. because i want to share some important object with particular users.

Thanks

Amila

ashfaq_haseeb
Champion III
Champion III

I think you have to use macro for that.

Regards

ASHFAQ

amilafdo
Creator
Creator
Author

Hi Mohammed,

Do you have macro for this.

please share.

Thanks

Amila

amilafdo
Creator
Creator
Author

any one has macro for this pls share

rohit214
Creator III
Creator III

Hi Amila,

So you mean you want to export those object while reloading the application,

If it is so then you need to use macro.

Thanks

Rohit

amilafdo
Creator
Creator
Author

Yes Rohit.

rohit214
Creator III
Creator III

SO please let me know whether you want to export image of the object or values in excel?

For exporting the values

sUB tEST

filePath = "D:\Miltrust\Data\Xlsx\Performance Excels\Fund_All_Assets.xlsx"// change the path

                Set excelFile = CreateObject("Excel.Application")

                excelFile.Visible = true

                Set curWorkBook = excelFile.WorkBooks.Add

                Set curSheet = curWorkBook.WorkSheets(1)

                Set tableToExport = ActiveDocument.GetSheetObject("CH18")// change the object ID

                Set chartProperties = tableToExport.GetProperties

                tableToExport.CopyTableToClipboard true

                curSheet.Paste curSheet.Range("A1")

                excelFile.Visible = False

                excelFile.DisplayAlerts =True

                excelFile.DisplayAlerts = False

                curWorkBook.SaveAs filePath

                curWorkBook.Close

                excelFile.Quit

                excelFile.DisplayAlerts = True

                Set curWorkBook = nothing

                Set excelFile = nothing

END SUB

Thanks

Rohit