Conectar Excel ao Acess

[Adolf lima]

Amigos,

 

Preciso da ajuda de vocês , sou carne fresca na programação...estou com dificuldade muito grande em conectar planilha excel/vba ao banco de dados acess, onde ficarão todos dados salvos...

 

o arquivo esta em anexo

 

login:faturamento

senha: aliança

 

se puderem me ajudar somente nesta conexão fico agradecido...

 

código abaixo:

 

Dim conexao As Database

Dim rspag As Recordset

 

Private Sub UserForm_Initialize()

 

    Set conexao = OpenDatabase(ActiveWorkbook.Path & "\pagamentos.mdb")

    Set rspag = conexao.OpenRecordset("rs_pagamentos")

    

    MsgBox rspag!Modalidade

    

 

End Sub

 

teste.zip

[Basole]

Adolf lima, ao invés de dao usei  adodb.

Mas nao entendi o proposito, no seu codigo, os dados so estão carregando uma msg? 

 

 

 

teste-v1.zip

[Adolf lima]

• essa mensagem era para verificar se a conexão com o banco de dados estava funcionando, só que dava erro..

cara agradeço muito...mesmo....

 

 

valeu,,,!!!!

 

)))