MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    Conexão VBA com Data Base File (.DB)

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 9/2/2020, 12:24

    Bom dia
    A todos

    Sou iniciante em VBA excel, e estou tentando construir projeto com banco de dados Sqlite3.
    A conexão para importar as tabelas direto para planilha esta funcionando.
    Contudo preciso do código para o form que possa através do form vba incluir, excluir, alterar e
    listar os dados das tabelas do Sqlite3.
    Já procurei na internet e não consegui encontrar nada que funciona-se daí construí este código abaixo
    que não funciona.

    NO MODULO
    Código:
    Public total As Long

    Public Function id()

    Dim conn As Object, rst As Object

    Set conn = CreateObject("ADODB.Connection")
    Set rst = CreateObject("ADODB.Recordset")

    ' OPEN CONNECTION
    conn.Open "DSN=SQLite3 Datasource;Database=H:\NotizCaixa\NotizCaixa.DB;"

    strSQL = "SELECT descriçao, t_produtos FROM NotizCaixa_DB GROUP BY descriçao, NotizCaixa_DB ORDER BY descriçao ;"

    ' OPEN RECORDSET
    rst.Open strSQL, conn, 1, 1

    rst.Close

    ' FREE RESOURCES
    Set rst = Nothing: Set conn = Nothing
        
    End Function

    NO MODULO CLASSE
    Código:
    Public conn As New ADODB.Connection

    Public Sub Conectar()

        Dim nConectar As String
        nConectar = "DRIVER=SQLite3 oledb Driver;Database=H:\NotizCaixa\NotizCaixa.db;"
        conn.ConnectionString = nConectar
        conn.Open
        
    End Sub

    Public Sub Desconectar()
        conn.Close
    End Sub

    Por favor se alguém puder me ajudar ficarei muito grato.

    Deus acima de tudo e todos.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 10/2/2020, 12:55

    Guedelha bom dia,

    Veja este site de strings de conexão, inclusive SQLite.

    https://www.connectionstrings.com/sqlite/

    boa sorte


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 23/4/2021, 21:59

    Boa tarde!
    Alexandre

    Segui sua orientação e adaptei o código, contudo não estou conseguindo a interação entre vba excel com SQLite3.
    Será que você poderia me dar mais uma ajuda no tema. Segue em anexo o form vba e o banco de dados SQLite3.

    Grato.
    Anexos
    Conexão VBA com Data Base File (.DB) AttachmentConsulta.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (262 Kb) Baixado 9 vez(es)

    Guedelha gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 24/4/2021, 00:47

    Ola Guedelha,

    Ja baixei teu exemplo e vou analisar, e assim que eu terminar vou disponibilizar.

    Até mais

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 24/4/2021, 01:21

    Guedelha,

    Vc precisa baixar o driver de ODBC do SQLite também para fazer a conexão com tua base de dados.

    OBS.: Você pretende manter um formulário de dados desenvolvido no Excel?
    O desenvolvimento de formulários no Access é mais pratico e atraente também...rss


    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 24/4/2021, 16:44

    Boa tarde!
    Alexandre,

    A escolha do VBA Excel se dá em função da prática que possuo,
    e além do meu projeto é muito grande e abrangente.
    Obrigado fico aguardando suas orientações.

    Grato.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 25/4/2021, 15:58

    Guedelha,

    Se você pretende construir um ERP, eu sugiro que você escolha outras linguagens e SGDB mais seguros.
    Como você já tem um conhecimento com VBA, acredito que a linguagem mais próxima seria o VB.Net (windows forms) versão Desktop, e banco de dados SQL Server (SQL Server Express) que é gratuito e possui muito mais recursos que o SQLite (stored procedures, rules, controle de usuários).
    Existe também o MySQL que é gratuíto e é uma excelente opção para trabalhar também.

    Fiz algumas modificações no formulário "Bancos" e também modifiquei a conexão como SQLite:

    Conexão VBA com Data Base File (.DB) Conex_10


    Interface do SQLite Studio...fica mais fácil de trabalhar ao invés de usal o prompt do DOS:

    Conexão VBA com Data Base File (.DB) Sqlite10





    Obs.: você mencionou que já fez uma conexão com SQLite para carregar os dados na planilha, então acredito que vc ja tenha criado um conexão via ODBC.
    Substitua o Data Source acima pela nome do teu ODBC.


    Segue planilha com o formulário de Bancos com alguns ajustes e comentários.

    Espero ter ajudado.


    Boa sorte

    []'s

    FIM
    Anexos
    Conexão VBA com Data Base File (.DB) AttachmentSpim.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (76 Kb) Baixado 26 vez(es)


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 1/5/2021, 00:51

    Boa noite
    Alexandre

    Estou muito grato pela enorme ajuda neste projeto que tento efetuar.
    Sou iniciante na linguagem vba excel, e como há uma limitação de
    armazenamento no access optei pelo sqlite3 que apresenta uma
    um volume de armazenamento bem maior e seguro.
    Bom baixei o arquivo corrigido, contudo não consigo fazer funcionar,
    você poderia me ajudar novamente para que funcione.

    Muito obrigado, e fico no aguardo de suas orientações.

    Guedelha gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 3/5/2021, 01:12

    Guedelha boa noite,

    Qual o erro que está ocorrendo no exemplo que te mandei?

    Na Mensagem nº5 eu mencionei que era necessário baixar e instalar o driver ODBC do SQLite.
    Em seguida, criar uma conexão através do ODBC no Windows da sua máquina, que fica em Painel de Controle >> Fontes de Dados ODBC (64 bits) e em seguida ira exibir a seguinte tela:

    Conexão VBA com Data Base File (.DB) Sqlite11


    Criar conexão conforme abaixo:

    Conexão VBA com Data Base File (.DB) Sqlite12

    Neste caso, o banco de dados estava em "C:\SQLiteStudio\databases\Base.DB", mas você deve informar o diretório onde está teu banco de dados.

    Em seguida, abra a planilha e faça o teste.

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 3/5/2021, 22:10

    Boa noite
    Alexandre

    Muito bom consegui, foi demais, e por isto lhe sou muito grato.
    Agora estou vendo mais possibilidades para o meu projeto.
    Contudo gostaria de tirar uma duvida com você sobre a linha do
    código no formulário vba, que você apontou erro.

    Código:
      ' ----- Erro - Não existe tabela de Municípios-------
    '    sql = "SELECT Municipios FROM Estado"
    '    sql = sql & " ORDER BY Municipios"
    '
    '    cx.Conectar
    '
    '    Set banco = New ADODB.Recordset
    '
    '    banco.Open sql, cx.conn
    '
    '    Do While Not banco.EOF
    '        Me.cboCidade.AddItem banco!MUNICIPIOS
    '        banco.MoveNext
    '    Loop
    '    cx.Desconectar
    '    Set banco = Nothing

    Como posso apontar este código para preencher um combobox
    com informação da coluna registro da tabela sqlite3, e com a
    seleção efetuar o preenchimento de textboxes correlatos a este
    registro.
    Exemplo:
    Ao selecionar o registro 1 no cadastro de clientes, e os textboxes
    correlatos são preenchidos com o nome do cliente e outras
    informações relacionadas a este registro.

    Desde já agradeço a enorme ajuda, e fico no aguardo de suas orientações.

    Att.:

    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein) escreveu:

    Guedelha gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 3/5/2021, 22:41

    Guedelha,

    Apesar do exemplo que vc mencionou, não compreendi o que vc quer.
    O formulário já possui os botões de navegação, onde vc pode navegar pelos registros e carregar os campos normalmente.

    Vc precisa do preenchimento do combobox de Municipios?

    Ou vc quer um combobox para pesquisar determinado registro e depois carregar os dados?


    []'s

    FIM



    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 5/5/2021, 00:47

    Boa noite
    Alexandre

    Sim!
    Preciso que um combobox pesquise um determinado registro em outra tabela do SQLite,
    e depois carregar os dados em diversos textboxes.

    Fique com Deus, e muito obrigado.

    Grato.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 5/5/2021, 14:19

    Guedelha, bom dia

    Pesquisas através do combobox não é a melhor opção.
    Imagine, por exemplo, a tabela "t_bancos" que possui 4200 registros. Além de demorar para carregar o combo, a pesquisa fica mais complicada.

    O correto seria criar uma tela de pesquisa com os seguintes objetos:
    - Campo: combobox como s campos da tabela que deseja pesquisar
    - Valor: um textbox onde voce vai informar o texto ou parte dele para pesquisa
    - Pesquisar: um botão para realizar a pesquisa
    - Lista: uma listbox que receberá os dados conforme campo e valor pesquisados.

    Desta forma, vc vai pesquisar realmente o que vc procura.

    Espero ter ajudado.

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 5/5/2021, 15:05

    Bom dia!
    Alexandre

    Obrigado seria algo como o arquivo em anexo?

    Grato.
    Anexos
    Conexão VBA com Data Base File (.DB) AttachmentSpim.xlsm
    Você não tem permissão para fazer download dos arquivos anexados.
    (66 Kb) Baixado 6 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 5/5/2021, 17:22

    Guedelha?

    Você está iniciando o desenvolvimento de um sistema ou fazendo apenas manutenção em sistema existente?


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 5/5/2021, 19:18

    Alexandre

    Estou iniciando, e estou testando estes modelos para criação e desenvolvimento.

    Grato.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 13/12/2016

    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Alexandre Fim 5/5/2021, 20:00

    Cara?

    O Excel é mais "chato" para desenvolver formulários, e se houver alguma atualização do Windows e também atualizações de .OCX, dependo do que vc tiver utilizando, pode gerar erro de versão de .OCX
    Já que você está começando, sugiro que vc mude para o Access. Ele é mais prático para criar formulários e relatórios e tal. Também possui seus componentes nativos.
    Também trocaria de banco de dados.
    Baixe o SQL Server Express e vc será feliz !!! rsss

    Apenas sugestão.


    []'s

    FIM





    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Conexão VBA com Data Base File (.DB) Setinf11
    Sistemas e Tecnologia Ltda

    Guedelha gosta desta mensagem

    Guedelha
    Guedelha
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 13
    Registrado : 24/06/2019

    Conexão VBA com Data Base File (.DB) Empty Conexão VBA com Data Base File (.DB)

    Mensagem  Guedelha 5/5/2021, 20:40

    Boa tarde!
    Alexandre

    Irei migrar para Delphi7 futuramente, e para banco de dados SQL Server conforme sua indicação.
    Contudo estou querendo ter todo o projeto pronto em vba excel e sqlite, pois como começo um
    pouco ficará mais fácil para mim depois desenvolver os módulos em outro sistema seguindo
    todas as interligações, já que são quase 30 formulários.
    Estou quebrando a cabeça neste formulário de pesquisa, pois sou leigo em conexões,
    e esta conexão irá resolver 90% interligações do projeto.    
    Já comecei baixando o SQL Server Express, preparando assim a etapa final do projeto
    com a migração para o novo sistema.
    Te agradeço muito qualquer orientação, que solucione este entrave.

    Grato.

    Conteúdo patrocinado


    Conexão VBA com Data Base File (.DB) Empty Re: Conexão VBA com Data Base File (.DB)

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 16/7/2024, 12:19