EXPORTAR VALOR DE LISTVIEW PARA PLANILHA

JULIO92 05/01/2012 15:48:55
#392475

Oi, estou fazendo uma aplicação em vb6 de controle de estoque.

O meu problema é: Quero exportar os valores da listview consulta de produtos, que contém as colunas: Código, Produto e Quantidade.

Ja consigo abrir a planilha pelo vb ,mas falta essa outra parte.

A parte do código q eu tenho é essa:

Private Sub cmdExcel_Click()
Dim EApp As Object
Dim EwkB As Object
Dim EwkS As Object


[ô] Cria a componente da classe application
[ô] inclui um novo arquivo e uma nova planilha

Set EApp = CreateObject([Ô]excel.application[Ô])
Set EwkB = EApp.Workbooks.Add
Set EwkS = EwkB.Sheets(1)

[ô] exibe a aplicação Excel
[ô]
EApp.Application.Visible = True

End Sub



Obrigado.