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]Extrair últimos 5 caracteres de um texto/número

    Krauss
    Krauss
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 254
    Registrado : 23/12/2011

    [Resolvido]Extrair últimos 5 caracteres de um texto/número Empty [Resolvido]Extrair últimos 5 caracteres de um texto/número

    Mensagem  Krauss 27/11/2020, 02:05

    Salve Srs.!!!

    Todos os tópicos que achei aqui sobre Mid, testei na minha condição e não consegui adaptar.

    Acredito ser bem simples: após digitar o código 1121999900011 no campo "leituraCodigoProd", como faço para extrair os últimos 5 caracteres de um código que tem 13 e jogá-lo no campo "txtCodProd"? Obs.: O valor do campo é numérico, mas este campo está configurado como texto na tabela, pois futuramente ele também terá letras.

    Ex.: 1121999900011
    Preciso extrair o 00011 (considerando sempre os zeros à esquerda).

    Tentei: Me.txtCodProd = Mid(leituraCodigoProd.Text, 9, 13) no evento após atualizar do campo leituraCodProd, mas não deu certo.


    .................................................................................
    Trabalho com Access 2013

    "A dúvida é o princípio da sabedoria"
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 479
    Registrado : 25/02/2016

    [Resolvido]Extrair últimos 5 caracteres de um texto/número Empty Re: [Resolvido]Extrair últimos 5 caracteres de um texto/número

    Mensagem  FranklinJSP 27/11/2020, 02:58

    Boa noite Krauss

    Tenta assim:

    Código:
    Me.txtCodProd = Right(leituraCodigoProd.Text, 5)

    Saludos


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    Krauss
    Krauss
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 254
    Registrado : 23/12/2011

    [Resolvido]Extrair últimos 5 caracteres de um texto/número Empty Re: [Resolvido]Extrair últimos 5 caracteres de um texto/número

    Mensagem  Krauss 27/11/2020, 03:29

    Saudações Franklin!

    Deu o mesmo erro -> Erro em tempo de execução '2185': "Você não pode fazer referência a uma propriedade ou a um método de um controle, a menos que o controle tenha o foco."


    .................................................................................
    Trabalho com Access 2013

    "A dúvida é o princípio da sabedoria"
    Krauss
    Krauss
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 254
    Registrado : 23/12/2011

    [Resolvido]Extrair últimos 5 caracteres de um texto/número Empty Re: [Resolvido]Extrair últimos 5 caracteres de um texto/número

    Mensagem  Krauss 27/11/2020, 03:42

    Franklin, fiz um teste retirando o ".Text" da expressão e funfou cara. Valeu mesmo pela ajuda, abs!

    Ficou assim: Me.campoDestino = Right(campoOrigem, 5)


    .................................................................................
    Trabalho com Access 2013

    "A dúvida é o princípio da sabedoria"
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 479
    Registrado : 25/02/2016

    [Resolvido]Extrair últimos 5 caracteres de um texto/número Empty Re: [Resolvido]Extrair últimos 5 caracteres de um texto/número

    Mensagem  FranklinJSP 29/11/2020, 00:28

    Que bom Krauss!

    lol! lol! lol!


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"

    Conteúdo patrocinado


    [Resolvido]Extrair últimos 5 caracteres de um texto/número Empty Re: [Resolvido]Extrair últimos 5 caracteres de um texto/número

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 08:05