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]Limpar espaço em branco

    avatar
    marques
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 03/01/2011

    [Resolvido]Limpar espaço em branco Empty [Resolvido]Limpar espaço em branco

    Mensagem  marques 6/2/2019, 11:31

    Boa tarde Forum

    Gostava que me ajudassem a desbloquear esta base de dados, pq quando clico em qualquer objeto do Access da-me esta msg (ver Anexo)



    Obrigado


    Última edição por marques em 15/3/2021, 17:31, editado 1 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3348
    Registrado : 21/04/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  Marcelo David 6/2/2019, 12:19

    Bom dia Marques, seja bem-vindo!

    Você pode usar Replace, caso os espaços possam estar em qualquer parte da string.

    Digamos que você prentende por em um textbox a seguinte string mas sem espaços:

    P T50000 00000000 000000 000

    Usando o replace, ele te devolve assim:

    Me.SuaTextBox = Replace("P T50000 00000000 000000 000", " ", "")

    E se a string com espaços estiver na própria textbox, pode fazer ao clique de botão ou onde lhe convir:

    Me.SuaTextBox = Replace(Me.SuaTextBox," ","")

    Ambos resultaram assim:
    PT5000000000000000000000

    Depois, dê uma pesquisa sobre as funções Trim, RTrim e LTrim. Elas tratam da mesma coisa, só que apenas locais
    específicos da string.


    .................................................................................
    [Resolvido]Limpar espaço em branco Logo-coral Aprenda Formulário Desacoplado, clique aqui. | Marcelo David
    avatar
    marques
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 03/01/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  marques 6/2/2019, 15:45

    Mt obrigado Marcelo

    Marcelo se calhar expliquei mal mas este problema é para uma tabela que tem vários registos assim.


    Obrigado
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3348
    Registrado : 21/04/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  Marcelo David 6/2/2019, 15:49

    Então você precisa retirar os espaços vazios de todos os registros de um campo de uma tabela?


    .................................................................................
    [Resolvido]Limpar espaço em branco Logo-coral Aprenda Formulário Desacoplado, clique aqui. | Marcelo David
    avatar
    marques
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 03/01/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  marques 6/2/2019, 16:00

    sim, Pq eu copio do Excel e colo na referida tabela.
    Depois queria uma função que me eliminasse esses espaços em branco.

    Obg
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3348
    Registrado : 21/04/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  Marcelo David 6/2/2019, 16:33

    No evento clique de um botão:

    CurrentDb.Execute "UPDATE NomeTabela SET NomeCampo=REPLACE(NomeCampo, ' ', '')", dbFailOnError

    NomeTabela = Nome da tabela que contem os dados vindos do excel
    NomeCampo = Nome do campo que contem os espaços.



    Faça um backup antes de realizar o procedimento.


    .................................................................................
    [Resolvido]Limpar espaço em branco Logo-coral Aprenda Formulário Desacoplado, clique aqui. | Marcelo David
    avatar
    marques
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 03/01/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  marques 6/2/2019, 16:42

    Obrigado Amigo
    resolvido

    mt mt obg
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3348
    Registrado : 21/04/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  Marcelo David 6/2/2019, 16:44

    Ótimo que resolveu. Não esqueça de clicar no botão Resolvido.
    Dessa vez eu coloco.  [Resolvido]Limpar espaço em branco Icon_smile


    .................................................................................
    [Resolvido]Limpar espaço em branco Logo-coral Aprenda Formulário Desacoplado, clique aqui. | Marcelo David
    avatar
    marques
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7
    Registrado : 03/01/2011

    [Resolvido]Limpar espaço em branco Empty Re: [Resolvido]Limpar espaço em branco

    Mensagem  marques 6/2/2019, 16:52

    Tb, novato (Maçarico)

    Mais uma vez obrigado

      Data/hora atual: 25/7/2021, 03:46