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

    [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Compartilhe

    Daniel Meireles
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 16/05/2012

    [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Mensagem  Daniel Meireles em Ter 24 Jul 2012, 15:12

    Bom dia a todos!

    Primeiramente obrigado pelo forum e os colegas que nos ajudam.

    Utilizo o access 2007, e adicionei uma planilhazinha como exemplo pra minha pergunta pois não consegui formatar aqui. Tenho uma duvida em função Iff com mais de um criterio, do modo que estou fazendo não dá certo.

    o raciocinio é o seguinte.

    Se a coluna [Prioridade] for "1" ou "2" E coluna [Em dias]for maior que 30,na coluna [Data Final] mostre-me "em branco" caso contrario mostre-me [Data].

    agradeço desde já!

    abraço cheers


    Anexos
    Exemplo.xls
    Você não tem permissão para fazer download dos arquivos anexados.
    (25 Kb) Baixado 60 vez(es)

    Daniel Meireles
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 16/05/2012

    Re: [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Mensagem  Daniel Meireles em Sex 27 Jul 2012, 14:04

    Up.

    Acho que fui pouco claro na especificação da dúvida.
    avatar
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2295
    Registrado : 21/04/2011

    Re: [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Mensagem  Marcelo David em Sex 27 Jul 2012, 14:15

    Onde você irá por o IIf, em uma SQL no VBA ou em uma consulta gráfica do Access?


    .................................................................................
    Marcelo David
    [Você precisa estar registrado e conectado para ver este link.] (em construção)

    Daniel Meireles
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 16/05/2012

    Re: [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Mensagem  Daniel Meireles em Ter 31 Jul 2012, 13:23

    Desculpa a demora amigo.

    seria por uma consulta mesmo.



    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1119
    Registrado : 05/02/2010

    Função Iff (SeImed) com mais um 1 critério

    Mensagem  good guy em Ter 31 Jul 2012, 15:57

    Olá Daniel,

    Tente com esta função que pra mim deu certo através de um formulário:

    Public Function MostraData()
    Dim sData As String

    sData = DLookup("DataInicial", "tblPecas", "Prioridade= 1")

    If Prioridade = 1 And Me.EmDias > 30 Then
    DataFinal = ""
    MostraData = DataFinal
    ElseIf Prioridade = 2 And Me.EmDias > 30 Then
    DataFinal = ""
    MostraData = DataFinal
    Else
    DataFinal = "'" & sData & "'"
    DataFinal = Replace(DataFinal, "'", "")
    MostraData = DataFinal
    End If
    End Function

    Tentei com uma consulta com esta sintaxe, mas não deu muito certo embora a lógica esteja correta:

    DataFinal: SeImed("EmDias<30";DPesquisa("Data";"tblPecas";"Prioridade=1");"") ou
    mesmo esta sintaxe:
    DataFinal: SeImed("[EmDias]<30 And [Prioridade]=1 or [Prioridade]=2";DPesquisa("Data";"tblPecas";"[EmDias]<30");"")

    Outra tentativa seguindo a lógica do VBA:

    DataFinal: SeImed ("Prioridade=1 And EmDias>30";"";"Prioridade=2 And EmDias>30";"";Dlookup("Data";"tblPecas";"EmDias<30")
    Ou
    DataFinal: SeImed(Prioridade=1 And EmDias>30;"";Prioridade=2 And EmDias>30;"";Dlookup("Data";"tblPecas";"EmDias<30")

    Se alguém quiser modificar e tentar de outra maneira...

    "O temor do Senhor é o princípio do conhecimento..."(Sl 111.10); Disse Jesus: "Eu sou a luz do mundo. Quem me segue não andará em trevas,..."(Jo 8.12); "Provai e vede que o Senhor é bom..."(Sl 34.Cool


    Última edição por good guy em Qui 16 Ago 2012, 13:51, editado 1 vez(es)

    Daniel Meireles
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 88
    Registrado : 16/05/2012

    Re: [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Mensagem  Daniel Meireles em Qua 01 Ago 2012, 15:33

    A primeira função que me passou deu certinho, até adicionei outras prioridades.

    Muito obrigado amigo. Fica com Deus.

    edjunho
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 235
    Registrado : 24/12/2011

    Re: [Resolvido]Função Iff (Seimed) com mais um 1 critério

    Mensagem  edjunho em Sex 28 Jul 2017, 00:01

    Boa noite good guy ou Daniel, gostaria de apreciar o resultado desta função. Adorei. Pode disponibilizar o banco?
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1119
    Registrado : 05/02/2010

    Função Iff (Seimed) com mais um 1 critério

    Mensagem  good guy em Ter 01 Ago 2017, 21:19

    Olá edjunho,

    Claro. Sem problemas. Houve algum problema pela Mensagem Nº 1?

      Data/hora atual: Seg 23 Abr 2018, 03:00