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

    Formulario de consulta e atualização de tabela.

    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    Formulario de consulta e atualização de tabela. Empty Formulario de consulta e atualização de tabela.

    Mensagem  maguim Ter 25 Abr 2017, 7:12 pm

    bom dia !

    Existe algum exemplo de codigo aberto para um formulario que upa o excel e faça a atualização de campos via vba ?


    abraços
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    Formulario de consulta e atualização de tabela. Empty Re: Formulario de consulta e atualização de tabela.

    Mensagem  Alvaro Teixeira Qua 26 Abr 2017, 11:53 am

    Olá Nathan

    Já experimentou uma "Busca" aqui no fórum, veja como fazer:
    https://www.maximoaccess.com/t1115-busca-no-forum-search

    Pelo menos tem um desde 2014, veja este tópico e o outro referenciado:
    https://www.maximoaccess.com/t29991-calculos-sobre-tabelas-ligar-excel-adionar-dados-a-tabela
    Abraço
    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    Formulario de consulta e atualização de tabela. Empty Re: Formulario de consulta e atualização de tabela.

    Mensagem  maguim Qua 26 Abr 2017, 6:39 pm

    texeira !

    mto obg !

    Uma duvida de funcionamento...


    vc criou um consulta de acrescentar novos registro, ela tem a função de consulta ou armazenamento temporario ?, nao entendi a relação do campo "NOVO" COMO forma DE SELEÇÃO...
    poderia me explica pf.

    apos isso vc fez em sql uma consulta de UPdate

    "UPDATE ExcelTmp LEFT JOIN A_Funcionarios ON ExcelTmp.ID_EMPREGAD=A_Funcionarios.ID_EMPREGAD SET ExcelTmp.NOVO = 0
    WHERE (((A_Funcionarios.ID_EMPREGAD) Is Not Null));"

    a relação aqui é, ele ira procurar os existentes dentro da tabela exceltmp o ExcelTmp.ID_EMPREGAD é igual dentro tabela A_Funcionarios.ID_EMPREGAD apontando o objeto selecinado do ExcelTmp.NOVO certo ? ou errado?

    e xls02AtualizaExistentes não entendi a relação.

    Abraços
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    Formulario de consulta e atualização de tabela. Empty Re: Formulario de consulta e atualização de tabela.

    Mensagem  Alvaro Teixeira Qua 26 Abr 2017, 8:20 pm

    Olá Nathan,

    Para os colegas que acompanharem este tópico a sua questão refere-se a este tópico:
    https://www.maximoaccess.com/t19615p6-resolvidoatualizacao-automatica-na-importacao-access-excel

    A modelagem dos dados, sei que não foi a melhor, mas fiz esse exemplo em "cima do joelho".
    No entanto a essencia, está lá.
    A tabela do Access é a base de dados que se quer sincronizada.
    E vão sendo distribuídos novos ficheiros de Excel com a informação atualizada.
    O que o projeto faz é:

    a) liga e importa para tabela local temporária
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, strTable, strPathFile, blnHasFieldNames

    b) verifica existentes e marca com não novo
    DoCmd.OpenQuery "xls01marcaExistentes", acViewNormal, acEdit

    c) atualiza dados dos existentes
    DoCmd.OpenQuery "xls02AtualizaExistentes", acViewNormal, acEdit

    d) lança novos registos (não existente na tabela access)
    DoCmd.OpenQuery "xls03LancaNovos", acViewNormal, acEdit

    Poderia ser tudo no VBA, mas optei por fazer consultas numeradas pela ordem de execução para mais fácil compreenssão.

    Abraço
    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    Formulario de consulta e atualização de tabela. Empty Re: Formulario de consulta e atualização de tabela.

    Mensagem  maguim Qui 27 Abr 2017, 11:02 am

    Perfeito,

    Sobre o vba, nao tenho duvidas e sim a ligação de consultas conforme meu topico de resposta

    gostaria de entender melhor a ligação entre as consultas.


    abraços
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    Formulario de consulta e atualização de tabela. Empty Re: Formulario de consulta e atualização de tabela.

    Mensagem  Alvaro Teixeira Qui 27 Abr 2017, 1:42 pm

    Olá Nathan,
    Ao importar por defeito na tabela ExcelTmp marca todos os registos como seja novo, o que não é verdade.
    Depois a primeira consulta xls01marcaExistentes vai marcar os que existem.
    Veja o relacionamento e o campo atualizar:
    Formulario de consulta e atualização de tabela. 027

    A consulta xls02AtualizaExistentes vai atualizar os dados dos existentes, neste caso só está atualizar o campo nome:
    Formulario de consulta e atualização de tabela. 029

    Por ultimo vai lançar os novos, na consulta adicionar xls03LancaNovos:
    Formulario de consulta e atualização de tabela. 030

    Espero ter tirado a sua dúvida.
    Abraço

    Conteúdo patrocinado


    Formulario de consulta e atualização de tabela. Empty Re: Formulario de consulta e atualização de tabela.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui 28 Mar 2024, 1:45 pm