MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Formulario de consulta e atualização de tabela.

    Compartilhe

    maguim
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    Formulario de consulta e atualização de tabela.

    Mensagem  maguim em Ter 25 Abr 2017, 20:12

    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
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em Qua 26 Abr 2017, 12:53

    Olá Nathan

    Já experimentou uma "Busca" aqui no fórum, veja como fazer:
    [Você precisa estar registrado e conectado para ver este link.]

    Pelo menos tem um desde 2014, veja este tópico e o outro referenciado:
    [Você precisa estar registrado e conectado para ver este link.]
    Abraço

    maguim
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  maguim em Qua 26 Abr 2017, 19:39

    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
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em Qua 26 Abr 2017, 21:20

    Olá Nathan,

    Para os colegas que acompanharem este tópico a sua questão refere-se a este tópico:
    [Você precisa estar registrado e conectado para ver este link.]

    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
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  maguim em Qui 27 Abr 2017, 12:02

    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
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em Qui 27 Abr 2017, 14:42

    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:
    [Você precisa estar registrado e conectado para ver este link.]

    A consulta xls02AtualizaExistentes vai atualizar os dados dos existentes, neste caso só está atualizar o campo nome:
    [Você precisa estar registrado e conectado para ver este link.]

    Por ultimo vai lançar os novos, na consulta adicionar xls03LancaNovos:
    [Você precisa estar registrado e conectado para ver este link.]

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

      Data/hora atual: Ter 17 Out 2017, 19:56