MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Atualizar Tabela com Função IFF

    Compartilhe
    avatar
    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 85
    Registrado : 10/12/2013

    [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  pengo em Qua Out 01, 2014 3:24 pm

    Boa Tarde Caros Colegas,

    Desculpe se o tópico é repetido, mas não encontrei solução para o meu problema aqui no fórum.

    A questão é que estou tentando atualizar minha tabela, após atualizar um campo no formulário, e estou utilizando o código abaixo, porém está dando erro e eu não consigo descobrir onde que é o problema.

    CurrentDb.Execute "UPDATE Cad_Tratamentos SET Data_Prevista= Iff([tempo1:]=Data; [Estádio1:]; DateAdd('d', Est_dias, Data_Semeio)) WHERE Protocolo= '" & Me.Protocolo & "';"

    Descrevendo o código: Eu preciso atualizar o campo "Data_Prevista" da minha tabela "Cad_Tratamentos", para isso preciso saber se o campo "Tempo1:" é igual ao texto "Data", se essa condição for verdadeira preciso que ele copie o que está no campo "Estádio1:" e coloque no campo "Data_Prevista", caso a condição seja falsa, preciso que ele some os campos "Est_dias" e "Data_Semeio" e salve no campo "Data_Prevista".

    Acho que assim fica mais fácil de entender, porém eu não sei se é possível.

    Alguém poderia me ajudar?

    Obrigado
    avatar
    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1577
    Registrado : 12/11/2009

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  Leandro em Qui Out 02, 2014 5:41 am

    Bom dia, tente assim:

    Dim dtDiasSoma as Date

    If Me!Tempo1 = "Data" Then
    dtDiasSoma = Me!Estádio
    Else
    dtDiasSoma = DateAdd('d', Me!Est_dias, Me!Data_Semeio)
    End If

    CurrentDb.Execute "UPDATE Cad_Tratamentos SET Data_Prevista=" & dtDiasSoma & " WHERE Protocolo= '" & Me.Protocolo & "';"


    .................................................................................




    Algumas soluções em access



    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]


    avatar
    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1577
    Registrado : 12/11/2009

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  Leandro em Qui Out 02, 2014 8:36 am

    Desculpe, faltou um detalhe importante na sintaxe:


    CurrentDb.Execute "UPDATE Cad_Tratamentos SET Data_Prevista=#" & dtDiasSoma & "# WHERE Protocolo= '" & Me.Protocolo & "';"


    .................................................................................




    Algumas soluções em access



    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]


    avatar
    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 85
    Registrado : 10/12/2013

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  pengo em Qui Out 02, 2014 12:58 pm

    Obrigado Pela Ajuda Leandro, e desculpe pela demora no retorno.

    Porém ainda não consegui o resultado correto.

    A mensagem que aparece é que ele não consegue encontrar o campo "Tempo1", mas eu entendi o porque disso, porque esse campo realmente não existe no meu formulário, ele existe somente na minha tabela, ou seja, no meu entender eu tenho que de alguma forma dizer para o access procurar isso na minha tabela e não no meu formulário, só que eu não tenho o conhecimento suficiente para fazer isso.

    Se eu estiver correto nas minhas suposições você poderia me ajudar?

    Desde já agradeço.
    avatar
    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1577
    Registrado : 12/11/2009

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  Leandro em Qui Out 02, 2014 1:28 pm


    Ajudo sim!
    Mas preciso saber, se esse campo Tempo1, tem vários valores na tabela, ou é apenas um lançamento?
    Como são esses lançamentos na tabela?


    .................................................................................




    Algumas soluções em access



    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]


    avatar
    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 85
    Registrado : 10/12/2013

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  pengo em Qui Out 02, 2014 1:33 pm

    Obrigado Leandro.

    Eles são lançados na tabela via formulário, mas esses lançamentos ocorrem em momentos anteriores, eles não são lançados nesse mesmo formulário que eu estou trabalhando.

    Ele tem vários valores diferentes, mas que são padrões e todos são textos, no formulário onde ele é lançado o usuário escolhe esse valor em uma combobox, que possui 6 opções, e uma delas é o texto "Data".

    Espero que eu tenha sido compreendido.

    Abraços
    avatar
    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1577
    Registrado : 12/11/2009

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  Leandro em Sex Out 03, 2014 5:09 am

    Bom dia,
    Então dessa forma, teríamos que procurar na tabela um registro pertinente para executar a condicional?
    Existe um Id para esses registros?
    Faça assim, exporte a tabela para excel e poste aqui para analisarmos.


    .................................................................................




    Algumas soluções em access



    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]

    [Você precisa estar registrado e conectado para ver este link.]


    avatar
    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 85
    Registrado : 10/12/2013

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  pengo em Sex Out 03, 2014 11:27 am

    Boa Tarde Leandro,

    Isso, na verdade não seria um registro, seria um grupo de registros, esses registros seriam definidos pelo campo Protocolo, por exemplo, todos os registros que o campo Protocolo esteja preenchido com a letra "X" são os que devem ser alterados.

    Exportei e anexei a tabela para melhor entendimento.

    Desde já agradeço o empenho.


    Anexos
    Cad_Tratamentos.xlsx
    Você não tem permissão para fazer download dos arquivos anexados.
    (17 Kb) Baixado 4 vez(es)
    avatar
    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 85
    Registrado : 10/12/2013

    Re: [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  pengo em Qui Out 16, 2014 8:55 am

    Resolvido.

    Utilizei consultas.

      Data/hora atual: Ter Maio 23, 2017 6:42 am