ACESSANDO DADOS DO EXCEL

RICKSOUSA 23/03/2011 21:15:05
#368962
tenho um arquivos com dados de clientes no excel tem como fazer um sisteminha com vb6 para fazer consulta?
TECLA 23/03/2011 21:39:12
#368964
Resposta escolhida
RICKSOUSA 24/03/2011 10:24:07
#369009
obrigado tecla, e estou esperando vc responder meu email que te enviei até agora.

valeu um abraço!
RICKSOUSA 24/03/2011 10:46:04
#369019
tecla, estou com o microsoft officer 2007 instalado, eu estou seguindo esse tutorial que vc indicou.

então eu segui isso.

[txt-color=#e80000]Private Sub CmdExcel_Click()
Dim a, b As String
Dim i As Integer
Dim Exlc As New Chart

[ô]
[ô] 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

[ô] Preenche a primeira e a segunda coluna
[ô] com alguns valores numéricos
[ô]
For i = 1 To 10
a = [Ô]A[Ô]
b = [Ô]B[Ô]
Range(a & i).FormulaR1C1 = Str(i)
Range(b & i).FormulaR1C1 = Str(i / 2)
Next i

[ô]seleciona da célula b2 até a b10
Range([Ô]B2:B10[Ô]).Select

[ô]Cria e exibe o gráfico
Set Exlc = EApp.Charts.Add

[ô]torna o formulário do VB visível para poder fechar o Excel
frmexcelvb.Show

End Sub[/txt-color]

e esta dando o seguinte erro na linha em negrito.

Compile error

User defined type not defined.

????


Tópico encerrado , respostas não são mais permitidas