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

    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Atualizar Tabela com Função IFF

    Mensagem  pengo em Qua 01 Out 2014, 22:24

    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

    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  Leandro em Qui 02 Out 2014, 12:41

    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



    Menu Treeview

    Restringir valores já lançados em caixa de combinação - Texto

    Restringir valores já lançados em caixa de combinação - Valores numéricos



    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  Leandro em Qui 02 Out 2014, 15:36

    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



    Menu Treeview

    Restringir valores já lançados em caixa de combinação - Texto

    Restringir valores já lançados em caixa de combinação - Valores numéricos



    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  pengo em Qui 02 Out 2014, 19:58

    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.

    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  Leandro em Qui 02 Out 2014, 20:28


    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



    Menu Treeview

    Restringir valores já lançados em caixa de combinação - Texto

    Restringir valores já lançados em caixa de combinação - Valores numéricos



    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  pengo em Qui 02 Out 2014, 20:33

    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

    Leandro
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  Leandro em Sex 03 Out 2014, 12:09

    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



    Menu Treeview

    Restringir valores já lançados em caixa de combinação - Texto

    Restringir valores já lançados em caixa de combinação - Valores numéricos



    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  pengo em Sex 03 Out 2014, 18:27

    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)

    pengo
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  pengo em Qui 16 Out 2014, 15:55

    Resolvido.

    Utilizei consultas.

      Data/hora atual: Qui 08 Dez 2016, 14:05