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


2 participantes

    [Resolvido]Dia da semana

    xoxe
    xoxe
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 241
    Registrado : 27/03/2016

    [Resolvido]Dia da semana Empty [Resolvido]Dia da semana

    Mensagem  xoxe 28/4/2016, 21:57

    Boa noite!

    Gostaria de saber se consigo fazer alguma expressão no vba onde, sempre que for sexta feira um determinado botão seja desabilitado.

    rubenscouto
    rubenscouto
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 679
    Registrado : 02/10/2011

    [Resolvido]Dia da semana Empty Re: [Resolvido]Dia da semana

    Mensagem  rubenscouto 28/4/2016, 22:26

    para fazer isto você terá que criar um campo Data ou um campo com a função "=Date()", outra função para identificar o numero deste dia da semana deste campo, e no evento Atual do formulario criar a condição de desabilitar este botão que você quer.
    Ex.:
    if weekday(me.seucampoData) = 6 then
    me.SeuBotãoDoFormulario.enabled = False
    else
    me.SeuBotãoDoformulario.enabled = True
    end if
    xoxe
    xoxe
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 241
    Registrado : 27/03/2016

    [Resolvido]Dia da semana Empty Re: [Resolvido]Dia da semana

    Mensagem  xoxe 29/4/2016, 00:23

    Fiz mais fácil, mas obrigado pela ajuda!

    Weekday(Date) = 6


    Invés de criar uma caixa de texto no formulário..
    Flw! Cool


    Conteúdo patrocinado


    [Resolvido]Dia da semana Empty Re: [Resolvido]Dia da semana

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 14:13