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

    Código co máscara

    avatar
    Luís Antunes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 394
    Registrado : 05/04/2016

    Código co máscara Empty Código co máscara

    Mensagem  Luís Antunes 15/8/2021, 16:44

    Preciso da vossa ajuda para este código.
    Penso que o format não é apropriado para a máscara de introdução.

    Private Sub Rubrica_AfterUpdate()
    If Rubrica = "02-02-01" or "04-08-02 Then
    Format Rubrica = "##\-##\-##\.aa\.aa"
    Else
    Format Rubrica = "##\-##\-##"
    End If

    End Sub


    Luís Antunes
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Código co máscara Empty Re: Código co máscara

    Mensagem  Alexandre Fim 15/8/2021, 19:03

    Luis

    Tente isso:

    Código:


    Private Sub Rubrica_AfterUpdate()
       
        If Rubrica = "02-02-01" Or Rubrica = "04-08-02" Then
            Rubrica.InputMask = "##\##\##\@@\@@"
        Else
            Rubrica.InputMask = "##\##\##"
        End If

    End Sub


    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Código co máscara Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    Luís Antunes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 394
    Registrado : 05/04/2016

    Código co máscara Empty Re: Código co máscara

    Mensagem  Luís Antunes 15/8/2021, 23:58

    Boa noite Alexandre

    O seu código não resultou.
    Mando em anexo uma BD com a dúvida.

    Obrigado pela disponibilidade

    Luís Antunes
    Anexos
    Código co máscara AttachmentMáscara.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (53 Kb) Baixado 3 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Código co máscara Empty Re: Código co máscara

    Mensagem  Alexandre Fim 16/8/2021, 00:05

    Luis,

    O que vc pretende ao usar a máscara no campo?

    Em qual situação deve-se mudar a máscara?


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Código co máscara Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    Luís Antunes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 394
    Registrado : 05/04/2016

    Código co máscara Empty Re: Código co máscara

    Mensagem  Luís Antunes 16/8/2021, 11:35

    Bom dia Alexandre

    Quando imprimo o relatório o campo fica com esta forma:

    02/01/02.__.__
    04/08/02.AO.01

    deveria ficar

    02/01/02
    04/08/02.AO.01

    Luís Antunes

      Data/hora atual: 6/10/2022, 07:41