Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Modelo de Cadastro com BD Access

Discussões sobre a integração do Excel com o Banco de Dados Access

Moderador: joseA

Guima
Consultor
Consultor
Mensagens: 242
Registrado em: Sex Out 30, 2009 6:10 am

Re: Modelo de Cadastro com BD Access

Mensagem por Guima »

Leandro e José,

Tô aprendendo, então peço desculpas por tantas perguntas...

O modelo novo do Leandro é muito bacana, mas não vou me aventurar por ele ainda, prefiro começar pelo mais simples. Pelo que entendi a conexão do Leandro é externa, ou seja criada num módulo à parte. Já a que você sugeriu José pelo que vi no modelo deve ficar dentro de cada formulário, certo ? Ou tô enganado ? Tentei unir ambas e não deu muito certo. Ficou assim:

Código: Selecionar todos

Dim strConexao As String
    Dim strSQL As String
    Dim Conn As ADODB.Connection

sql = "SELECT * FROM tblCadastro"

      With rstBanco
        .AddNew
.Fields("NomeDaEmpresa") = Me.txtNomeEmpresa
        .Fields("NomeDoContato") = Me.txtNomeContato
        .Fields("CargoDoContato") = Me.txtCargoContato
        .Fields("Endereço") = Me.txtEndereco
        .Fields("Cidade") = Me.txtCidade
        .Fields("Região") = Me.txtRegiao
        .Fields("CEP") = Me.txtCEP
        .Fields("País") = Me.txtPais
        .Fields("Telefone") = Me.txtTelefone
        .Fields("Fax") = Me.txtFax
        .Fields("HomePage") = Me.txtHomePage
        .Update
    End With
Pelo que percebi preciso definir o addNew de alguma forma, mas não entendi como e onde.

VAleu


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
joseA
Jedi
Jedi
Mensagens: 1048
Registrado em: Qui Out 22, 2009 7:22 am
Localização: Cel. Fabriciano - MG

Re: Modelo de Cadastro com BD Access

Mensagem por joseA »

Guilherme,

Verifique um dos arquivos do link citado: viewtopic.php?f=22&t=1472

Os dois utilizam dessa lógica, lá a linha de referência é com todas as colunas, mas testei alterando e rodou:

Código: Selecionar todos

rstBanco.Open "SELECT * FROM Fornecedores", cnnBanco, adOpenKeyset, adLockOptimistic, adCmdText
Lá a lógica é diferente mas adaptando é possivel, acredito. ;)


Guima
Consultor
Consultor
Mensagens: 242
Registrado em: Sex Out 30, 2009 6:10 am

Re: Modelo de Cadastro com BD Access

Mensagem por Guima »

José e Leandro,

Só para dar um feedback. Consegui fazer a adaptação como sugerido por vocês... rapaz, é muito show isso. Tô adorando !!!!

Espero poder contar com vocês caso precise. Abração e valeu mesmo pela força !!!

:D


Avatar do usuário
LEANDRO ALVES
Manda bem
Manda bem
Mensagens: 161
Registrado em: Dom Jul 25, 2010 7:41 pm

Re: Modelo de Cadastro com BD Access

Mensagem por LEANDRO ALVES »

Acho que esta eu até posso responder pelo José,

No que depender de nós e estando ao nosso alcance será sempre um grande prazer poder ajudar.
Nós também estamos aprendendo a utilizar este recurso (Excel + Access) e tem sido um grande aventura. :lol:

Abraços


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
joseA
Jedi
Jedi
Mensagens: 1048
Registrado em: Qui Out 22, 2009 7:22 am
Localização: Cel. Fabriciano - MG

Re: Modelo de Cadastro com BD Access

Mensagem por joseA »

:lol: :lol: Isso mesmo,

Melhor do que "achar" uma resposta é resolver com próprios méritos.

Estamos compartilhando aprendizado, antes do conhecimento. Tem sido uma aventura e tanto. Junte-se, serás bem vindo. :D

Tenho aprendido muito com o Leandro, com as questões e soluções que ele tem apresentado. Até porque ele saca mais do assunto do que eu.


Avatar do usuário
LEANDRO ALVES
Manda bem
Manda bem
Mensagens: 161
Registrado em: Dom Jul 25, 2010 7:41 pm

Re: Modelo de Cadastro com BD Access

Mensagem por LEANDRO ALVES »

joseA escreveu: Até porque ele saca mais do assunto do que eu.
Bondade sua José, estamos todos caminhando juntos. Lembrando também que o ponto de partida veio através de voce. :lol:

Abraços


Arthur maack
Colaborador
Colaborador
Mensagens: 10
Registrado em: Sex Fev 03, 2012 8:01 am

Re: Modelo de Cadastro com BD Access

Mensagem por Arthur maack »

Realmente muito boa essa aplicação com Listview, não tinha visto ainda esse método tão organizado no VBA. Parabéns pelos criadores desse projeto.

Estou fazendo uso dessa aplicação e mudei algumas coluna para possibilitar fazer lançamento de valores, eu só não estou conseguindo fazer um código que faça a soma dos valores lançado nessa coluna. Peço por favor ajuda dos membros do fórum para solucionar esse problema.

Desde já agradeço.


Avatar do usuário
LEANDRO ALVES
Manda bem
Manda bem
Mensagens: 161
Registrado em: Dom Jul 25, 2010 7:41 pm

Re: Modelo de Cadastro com BD Access

Mensagem por LEANDRO ALVES »

Arthur,

Muito obrigado pelas consideraçoes, é um grande incentivo para continuarmos avançando.
Tem um exemplo de soma no listview neste tópico que acabei de postar:
viewtopic.php?f=23&t=1654

Abraços


Guima
Consultor
Consultor
Mensagens: 242
Registrado em: Sex Out 30, 2009 6:10 am

Re: Modelo de Cadastro com BD Access

Mensagem por Guima »

Olá Pessoal,

Uma dúvida. Estou criando uma listagem com alguns dados de clientes, sei que existe a possibilidade de exportar os dados do Access para o Excel, porém os relatórios do Access são melhor elaborados, e com um visual melhor. Por esse motivo criei os relatórios pelo Access e gostaria de saber se tem como chamá-los e imprimir direto pelo Excel. Antes de perguntar dei uma boa vasculhada no google não encontrei algo parecido.

Valeu


Avatar do usuário
LEANDRO ALVES
Manda bem
Manda bem
Mensagens: 161
Registrado em: Dom Jul 25, 2010 7:41 pm

Re: Modelo de Cadastro com BD Access

Mensagem por LEANDRO ALVES »

Prezado Guima,

Eu estive pesquisando e não encontrei nada a respeito. Confesso que esta possibilidade está fora do meu alcance, então neste caso, teremos que apelar para a opinião do mestre Tomás.

Abraços


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder