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


5 participantes

    [Resolvido]Função SE no Access

    lhfernandes
    lhfernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 12/01/2012

    [Resolvido]Função SE no Access Empty Função SE no Access

    Mensagem  lhfernandes 5/11/2012, 19:49

    Boa tarde Mestres,

    Essa com certeza pra vocês é uma questão simples,

    No excel usava assim:

    =SE(A2=A1;1;0)

    E quando o valor repetia ele me colocava 1, mas na consulta no access não sei como fazer.

    Obrigado.
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 5/11/2012, 19:59

    Algumas opções para um campo não acoplado em uma consulta:

    Expr2: SeImed(flagrante=0;' ';'x')
    Expr2: SeImed([Pago]=-1;'SIM ';'NÃO')

    Diferenca: SeImed([Idade]>=60;65-[Idade];'NÃO')

    Teste: SeImed([Idade]>=60;65-[Idade];SeImed([Idade]<=50 E [Idade]>=41;40;SeImed([Idade]<=40 E [Idade]<=31;30;SeImed([Idade]>=10 E [Idade]<=21;20))))



    Teste_1: SeImed([Idade]>=60;65-[Idade];SeImed([Idade]<=50 E [Idade]>=41;40;SeImed([Idade]<=40 E [Idade]<=31;30;SeImed([Idade]>=10 E [Idade]<=21;20))))


    Utilizando o modulo de calculo de idade
    ValidadeCarteira: CalculaIdade([CpEmissaoDoc])


    SeImed(CalculaIdade([CpEmissaoDoc])>50 E CalculaIdade([CpEmissaoDoc])>=41;40

    Teste_3: SeImed([Idade]>=65;'Vencido';SeImed(CalculaIdade([CpEmissaoDoc])>5 ;'Vencido'))


    Teste_3: SeImed([Idade]>=65;'VENCIDO';SeImed(CalculaIdade([CpEmissaoDoc])>5;'VENCIDO'))


    Cumprimentos.
    lhfernandes
    lhfernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 12/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  lhfernandes 5/11/2012, 20:08

    Boa tarde Mestre,
    É o seguinte, não compreendi...
    É que é o seguinte:
    Tenho uma coluna, com valores em ordem crescente e preciso que quando um valor repetir ele me avise de alguma maneira, por exemplo colocando o número 1 e se ele repetir mais de uma vez faça a mesma coisa em todos.

    Não consegui identificar na sua lista algo assim, não sei se estou enganado.
    Me desculpe se estiver.

    Muito Obrigado pela resposta imediata Piloto.
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 5/11/2012, 22:12

    Tudo bem.. talvez eu tambem tenha entendido mal...

    Coloque o BD com a tabela para que eu possa entender o que necessita.

    Cumprimentos.
    lhfernandes
    lhfernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 12/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  lhfernandes 6/11/2012, 11:18

    Então, tá ai o BD, o que preciso é criar uma coluna chamada rework depois da coluna Peças e preciso que toda vez que repita o número da peça ele me sinalize tipo colocando o número 1 ou de qualquer outra forma.
    No Excel eu criei uma coluna rework que era a coluna B e coloque a seguinte fórmula:
    =SE(A2=A1;1;0)
    e toda vez que repete o número ele me põe o número 1.

    Obrigado.
    Anexos
    [Resolvido]Função SE no Access AttachmentRework.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (90 Kb) Baixado 121 vez(es)
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5077
    Registrado : 20/04/2011

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Silvio 6/11/2012, 11:45

    Olá LhFernandes....

    Com a permissão do Mestre Piloto, permitam dar um simples pitaquinho.

    Pode-se criar nessa tua tabela um campo denominado " Reworks " ( ou outro nome que lhe convém).

    Cria-se um formulário baseado nessa tabela.

    No campo denominado "Peça", no evento após atualizar insira a seguinte linha de comando:

    Private Sub Peça_AfterUpdate()
    If (Not IsNull(DLookup("]peça]", "rework", _
    "]peça] ='" & Me!Peça & "'"))) Then
    Me.Rework.Value = -1
    Else
    Me.Rework.Value = 0
    End If
    End Sub

    Teste e nos informe

    Piloto, um grande abraço fraternal para ti.




    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 6/11/2012, 12:08

    Bom dia grande Silvio!!! Como vai essa força?


    Vamos a mais uma sugestão Fernandes....

    1 - Crie um campo de chave primária na sua tabela e o nomeeie: ID_Rework (Numeração Automática)
    2 - Altere a nomenclatura dos restantes dos campos, adicione o prefixo cp a frete, ex: cpData, cpHora
    não utilize palavras reservadas ao access como: Hora, minuto, data, valor, nome etc.. isso fatalmente dará erro em algum momento

    3 - Em um campo não acoplado a instrução que conta os números duplicados

    Duplicados: DContar("*";"Rework";"cpPeça = '" & [cpPeça] & "'")


    Assim na coluna aparecerá quantos registros foram encontrado para aquele numero.


    Cumpimentos.


    Última edição por PILOTO em 6/11/2012, 12:16, editado 1 vez(es)
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 6/11/2012, 12:14

    Alterado os prefixos do nome do campo e colocado a chave primária assim como sugeri, cole esta Sql na consulta:

    SELECT Rework.[ID_Rework], Rework.[cpPeça], Rework.[cpData], Rework.[cpHoras], Rework.[cpMinutos], Rework.[cpSegundos], Rework.[cpLote], Rework.[cpDiametro], Rework.[cpEspessura], Rework.[cpGrau], Rework.[cpstdTC], Rework.[cprealTC], Rework.[cpEquipamento], DCount("*","Rework","cpPeça = '" & [cpPeça] & "'") AS Contar, IIf([Contar]=2,'DUPLICADO ','NÃO') AS Duplicado
    FROM Rework;

    Nela acrescentei a função Selmed para em caso de duplicados aparece o nome Duplicado na coluna, expressões utilizadas:

    Contagem
    Contar: DContar("*";"Rework";"cpPeça = '" & [cpPeça] & "'")

    Exibir duplicado
    Duplicado: SeImed([Contar]=2;'DUPLICADO ';'NÃO')


    Cumprimentos.
    lhfernandes
    lhfernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 12/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  lhfernandes 6/11/2012, 12:52

    Mestre Piloto,
    Perfeito .... muito obrigado.

    Mestre Silvio,
    Obrigado Também.

    Show mesmo.
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1314
    Registrado : 21/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Cláudio Más 6/11/2012, 13:02

    Olá,

    Se me permitem, uma alternativa sem uso de DCount(), que não é muito performática:

    lhfernandes
    lhfernandes
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 12/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  lhfernandes 6/11/2012, 13:23

    Bom dia Mestre Cláudio Más,

    Perfeito também.

    Muito obrigado.
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 6/11/2012, 14:04

    Bom também... no entanto em consultas agrupadas, caso o produto com o mesmo código possua duas datas diferentes e pretender utilizar a data na consulta, ela não agrupará tais produtos.



    Cumprimentos.
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1314
    Registrado : 21/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Cláudio Más 6/11/2012, 15:53

    Tem razão, PILOTO, considerando a solução que apresentei como está agora.

    Mas não seria problema adaptar para atender a essa questão da data.


    Última edição por Cláudio Más em 6/11/2012, 16:18, editado 1 vez(es)
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 6/11/2012, 16:02

    Talvez relacionando a consulta agrupada à tabela pelo campo do código do produto....


    Cumprimentos.
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1314
    Registrado : 21/01/2012

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Cláudio Más 6/11/2012, 16:20

    Isso já está feito na solução que apresentei, na consulta Qry_Rework.

    Só não está previsto ainda a questão da data, mas não parece ser necessário.
    avatar
    Convidado
    Convidado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Convidado 6/11/2012, 16:36

    Beleza... é por ai mesmo.

    Saudações.
    avatar
    TTrevellin.br
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 18/05/2013

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  TTrevellin.br 21/5/2013, 00:54

    Boa noite, alguem pode me ajudar?

    Tenho que fazer uma função onde Se a o resultado for maior que 90 ele apresenta um texto, se não for, ele não apresenta nenhuma texto, como faço pra por exemplo pegar uma data armazenada - a data de hoje?

    Pare ser especifico preciso saber se o funcionario está em periodo de experiencia.

    Obrigado.
    Juliano Lima
    Juliano Lima
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 13/12/2011

    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Juliano Lima 21/5/2013, 15:05

    Bom, todo funcionário tem 45 dias de experiência, podendo se estender por mais 45 dias.

    Você pode incluir um campo na sua consulta conforme abaixo:

    Tempo: Data()-[DatadeAdmissao]
    Vai retornar quantos dias já existem

    No critério desse campo você pode colocar <=90 pra consultar somente quem está Em experiencia
    ou se quiser colocar >=91 pra consultar quem está Contratado

    Conteúdo patrocinado


    [Resolvido]Função SE no Access Empty Re: [Resolvido]Função SE no Access

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/5/2024, 07:31