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


3 participantes

    [Resolvido]Remover Máscara de um campo na tabela

    Luiz Gustavo M
    Luiz Gustavo M
    Luiz Gustavo M
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 447
    Registrado : 13/09/2011
    • Mensagem nº1

    [Resolvido]Remover Máscara de um campo na tabela Empty Remover Máscara de um campo na tabela

    Mensagem  Luiz Gustavo M 6/12/2011, 19:13

    Boa noite Senhores.

    MinhaTabela tem um campo CNPJ.
    Os dados foram armazenados com máscara (ex.: 05.166.369/0001-65)
    Tenho mais de 600 registros cadastrador.
    Preciso remover a máscara da tabela: de 05.166.369/0001-65 para 05166369000165
    É possivel remover de uma vez ou tenho que fazer manualmente registro por registro?

    Agradeço a atenção

    Luiz Gustavo
    • Ir para o topo
    bitabit
    bitabit
    bitabit
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 225
    Registrado : 14/07/2010
    • Mensagem nº2

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  bitabit 6/12/2011, 19:19

    sim é possivel, usando a função replace.

    ha pouco tempo fiz um exemplo para um colega em que ele tinha 500 registos na tabela com isto:
    C:\Windows\Nomedocolega\Imagem1
    C:\Windows\Nomedocolega\Imagem2

    e deveria ficar apenas assim:
    \imagem1
    \imagem2
    etc..

    vou ver se encontro o exemplo e já o posto.


    .................................................................................
    Se vires um homem com fome, não lhe dês um peixe, ensina-o a pescar.
    Provérbio Chinês
    • Ir para o topo
    criquio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009
    • Mensagem nº3

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  criquio 6/12/2011, 19:23

    Uma forma rápida:

    Dim rs As Recordset
    Set rs = CurrentDb.OpenRecordset("NomeDaTabela")

    Do While Not rs.EOF

    rs.Edit

    rs!NomeDoCampo = Replace(rs!NomeDoCampo, ".", "")
    rs!NomeDoCampo = Replace(rs!NomeDoCampo, "/", "")
    rs!NomeDoCampo = Replace(rs!NomeDoCampo, "-", "")

    rs.Update

    rs.MoveNext

    Loop

    rs.Close
    Set rs = Nothing

    Teste em uma cópia.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br
    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.

    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)

    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.
    • Ir para o topo
    bitabit
    bitabit
    bitabit
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 225
    Registrado : 14/07/2010
    • Mensagem nº4

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  bitabit 6/12/2011, 19:25

    opa, já cá está a resposta do nosso grande Mestre.

    Em todo o caso fica o exemplo que fiz para o colega zeben.

    http://dl.dropbox.com/u/10750210/Imagens_zeben.rar


    .................................................................................
    Se vires um homem com fome, não lhe dês um peixe, ensina-o a pescar.
    Provérbio Chinês
    • Ir para o topo
    Luiz Gustavo M
    Luiz Gustavo M
    Luiz Gustavo M
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 447
    Registrado : 13/09/2011
    • Mensagem nº5

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  Luiz Gustavo M 6/12/2011, 19:37

    Oi
    Criquio

    Onde coloco este código?

    BitaBit

    O link vei com erro

    Obrigado Senhores

    • Ir para o topo
    criquio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009
    • Mensagem nº6

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  criquio 6/12/2011, 19:45

    No clique de um botão, por exemplo.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br
    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.

    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)

    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.
    • Ir para o topo
    Luiz Gustavo M
    Luiz Gustavo M
    Luiz Gustavo M
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 447
    Registrado : 13/09/2011
    • Mensagem nº7

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  Luiz Gustavo M 6/12/2011, 20:02

    Valeu Amigos

    Espero um dia poder ajudar os membros do forum assim como estão me ajudando.

    Vocês são DEZ!!!

    Abraços

    e muito ogrigado

    Luiz Gustavo

    Resolvido com Replace
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº8

    [Resolvido]Remover Máscara de um campo na tabela Empty Re: [Resolvido]Remover Máscara de um campo na tabela

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 7/11/2024, 22:01