Código de programa para exportar datos a EXCEL usando VB

ExcelPreview ListView1, "Prueba de Hao Nanren"

'------------------------- --------------------------------------------------

'listView Exportar como EXECL

'------------------------------ ---- ---------------------------------------------- --

Sub ExcelPreview público (ListView1 como ListView, vstrCaption como cadena)

'--------------------- ------------ -------------------------------------- ------------ ---------------

Atenuar mobjExcel como Excel.Application

Atenuar mobjWorkBook como Excel.Workbook

Atenuar strListItem como cadena

Atenuar strCol como cadena