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

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    avatar
    cristiansouza
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 12/01/2021

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  cristiansouza 12/3/2021, 16:03

    Olá Senhores! Very Happy

    Minha dúvida é a seguinte, tenho uma tabela com os campos "Prazo de Entrega", que devo preencher como 01/01/2021 e o campo "Mês do Prazo de Entrega".

    Eu gostaria que o valor do campo "Mês do Prazo de Entrega" fosse retornado automaticamente, de acordo com o preenchimento do campo "Prazo de Entrega".

    Única coisa que tentei foi colocar no valor padrão do campo "Mês do Prazo de Entrega" a expressão:

    =Mês([Prazo de Entrega])

    Porém não deu muito certo.

    Poderiam me ajudar por gentileza?
    avatar
    alantb
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 228
    Registrado : 25/07/2017

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  alantb 12/3/2021, 17:38

    Boa tarde, tenho um exemplo, não sei se serve para o que tu precisas , mas segue ai. Informa o numero de dias do prazo(txtNroDias) e a Data (txtPrazoEntrega) ele calculo o prazo e exibe nos formatos abaixo:

    Private Sub txtPrazoEntrega_AfterUpdate()
    Dim Entrega As Date

    '----------------------------------------------------------------------------------------
    ' em formato de data normal.Aqui calcula o prazo conforme numero de dias.

    Entrega = DateAdd("d", Me.txtNroDias, Me.txtPrazoEntrega)

    txtMesEntrega = Entrega
    '------------------------------------------------------------------------------------------

    'se for em Mes e Ano numérico. ex: 04/2021

    Me.txtDataMesEntrega = DatePart("m", txtPrazoEntrega) & "/" & DatePart("yyyy", txtPrazoEntrega)
    '----------------------------------------------------------------------------------------------------
    'só o mês. ex: Abril

    Me.txtMesExtenso = Format(Me.txtPrazoEntrega, "mmmm")
    '------------------------------------------------------------------------------------------------
    ' mês e ano. Mês extenso + Ano numérico. Ex: Abril/2021

    Me.txtMesComAno = Format(Me.txtPrazoEntrega, "mmmm") & "/" & DatePart("yyyy", txtPrazoEntrega)
    '------------------------------------------------------------------------------------------------
    End Sub

    Blza.

    ALAN
    avatar
    cristiansouza
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 12/01/2021

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  cristiansouza 12/3/2021, 17:54

    Boa tarde Alan!

    Agradeço suas considerações, mas o objetivo é que essa regra seja feita diretamente na tabela (creio eu que seria no campo "Valor Padrão"), e não no formulário.

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1476
    Registrado : 13/12/2016

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  Alexandre Fim 12/3/2021, 18:19

    Olá Cristiano,

    Não teria necessidade de gravar o nome do mês da data de entrega, visto que vc pode obter o nome do mês através de formulários/relatórios/consultas.

    Você pretende utilizar somente tabela para trabalhar os dados?

    Qual a tua necessidade?


    Att,





    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    avatar
    alantb
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 228
    Registrado : 25/07/2017

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  alantb 12/3/2021, 18:48

    Opa, também tem essa função;

    em um campo tipo Calculado insira a expressão:

    NomeMês(Mês([prazoentrega]))

    Assim ao inserir dados em Prazo Entrega exibe o mês por extenso no campo calculado.

    Para maiores detalhes veja o video do colega e mestre Gilberlânio sobre: "Aula de Access - Função Nome Mês".

    Também concordo com o Alexandre Finn, não é muito correto gravar campos calculados na tabela como: saldos, estoque, vencimentos. Isto tudo é exibido pro usuário através de consultas, relatórios e na hora de inserir dados através de formulários. Pois se for atualizado um campo que não reflete em outro campo da tabela, seu bd fica inconsistente. É só uma dica...

    ALAN
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1476
    Registrado : 13/12/2016

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  Alexandre Fim 12/3/2021, 18:56

    Alan,

    O Access não permite gravar o nome do mes em campo calculado.

    Att,


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    avatar
    cristiansouza
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 12/01/2021

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  cristiansouza 12/3/2021, 19:01

    Alexandre, o mês deverá sair como número, não é necessário sair o nome do mês.

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1476
    Registrado : 13/12/2016

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  Alexandre Fim 12/3/2021, 19:05

    Entendi Cristiano.

    Mas a função abaixo traz o nome do mes, que gera erro:
    NomeMês(Mês([prazoentrega]))

    O correto seria:
    Mês([prazoentrega])


    Att,


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.

    cristiansouza gosta desta mensagem

    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4133
    Registrado : 29/06/2012

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  Noobezinho 12/3/2021, 19:35

    Alan

    Diretamente na tabela somente se digitasse nela, o que pra nos programadores é um sacrilégio! Laughing
    Não tem como colocar um campo calculado em um tabela, pois, elas somente  gravam
    os dados alimentados por formulários, nada mais.
    O que dá pra fazer é usar um formulário, e na propriedade origem do registro dele colocar uma consulta,
    como esse exemplo:
    Crie uma tabela em modo designe clique em SQL e cole o exemplo;

    SELECT tbl_Clientes.idcliente, tbl_Clientes.NomeCliente, tbl_Clientes.dt_Saida, Month([dt_Saida]) AS MesSaida
    FROM tbl_Clientes;

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    cristiansouza
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 12/01/2021

    [Resolvido] Extrair mês de um campo da tabela através do valor padrão. Empty Re: [Resolvido] Extrair mês de um campo da tabela através do valor padrão.

    Mensagem  cristiansouza 15/3/2021, 10:18

    Alexandre, sua dica funcionou.

    Foi exatamente o que eu imaginei, porém eu estava colocando no campo "Valor Padrão" ao invés do campo "Calculado" Very Happy

    Obrigado a todos!

      Data/hora atual: 23/6/2021, 07:21