MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Concatenar campo com nome e conteúdo

    avatar
    Daluque
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 175
    Registrado : 06/03/2012

    [Resolvido]Concatenar campo com nome e conteúdo Empty [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  Daluque em 11/10/2016, 20:04

    Estou precisando fazer uma concatenação da seguinte maneira: o nome do campo + o conteúdo + separador "//"

    Por exemplo, tenho os campos: CampoA, CampoB, CampoC

    Se o somente o CampoA tiver conteúdo, fica CampoA 123
    Se o CampoA e o CampoB tiverem conteúdo, fica CampoA 123 // CampoB 456
    Se o CampoA, o CampoB e o CampoC tiverem conteúdo, fica CampoA 123 // CampoB 456 // CampoC 789


    será que sería possível ???

    abraços.


    Última edição por Daluque em 13/10/2016, 00:39, editado 1 vez(es)


    .................................................................................
    Daluque

    Office 2003
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7237
    Registrado : 05/11/2009

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  Alexandre Neves em 11/10/2016, 20:22

    Boa noite,
    Utilize a função
    Código:
    Function ConcatenaCampos(Optional CampoA As String, Optional CampoB As String, Optional CampoC As String) As String
        '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
        '  código criado por Alexandre Neves, do Fórum MaximoAccess                                                '
        '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
        If Len("" & CampoA) > 0 Then ConcatenaCampos = CampoA & " 123"
        If Len("" & CampoB) > 0 Then ConcatenaCampos = ConcatenaCampos = " // " & CampoB & " 456"
        If Len("" & CampoC) > 0 Then ConcatenaCampos = ConcatenaCampos = " // " & CampoC & " 789"
    End Function


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    Daluque
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 175
    Registrado : 06/03/2012

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  Daluque em 11/10/2016, 20:32

    Alexandre, obrigado pelo retorno. pena que não entendi sua resposta.

    CampoA, CampoB e CampoC - são os nomes dos campos.

    os valores que coloquei são somente exemplo do conteúdo dos campos (não são valores fixos).

    No campo concatenado retornaria.
    Nome do campo + valor do conteúdo (se houver) + separador "//"

    Por favor como usaria o código fornecido e como chamaria na consulta.
    desculpe a falta de trato.


    .................................................................................
    Daluque

    Office 2003
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5839
    Registrado : 15/03/2013

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  ahteixeira em 11/10/2016, 21:10

    Olá a todos,

    Daluque, por isso dizemos sempre para detalhar e se tiverem algo para postar, ajuda na compreensão.

    Será isto que pretende:
    [Resolvido]Concatenar campo com nome e conteúdo 28mcsc8

    Código:
    SELECT Tabela1.CampoA, Tabela1.CampoB, Tabela1.CampoC, IIf(Len([CampoA] & "")>0,"Campo A " & [CampoA]) & IIf(Len([CampoB] & "")>0," // Campo B " & [CampoB]) & IIf(Len([CampoC] & "")>0," // Campo C " & [CampoC]) AS Teste
    FROM Tabela1;

    Abraço
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7237
    Registrado : 05/11/2009

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  Alexandre Neves em 11/10/2016, 23:15

    Solucionei o enunciado que nos colocou
    Colocou 123, 456, 789 sem que esses valores viessem da tabela
    Não tenho bola de cristal


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5839
    Registrado : 15/03/2013

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  ahteixeira em 11/10/2016, 23:29

    Olá Alexandre, é verdade.
    Passamos a vida a repetir o mesmo...
    Aguardamos o retorno do colega.

    Abraço
    avatar
    Daluque
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 175
    Registrado : 06/03/2012

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  Daluque em 12/10/2016, 14:21

    Obrigado amigos. desculpe Alexandre Neves.

    O que eu quero é exatamente como no modelo.
    Estou em casa agora (feriado) amanhã farei o teste, mas aparentemente vai funcionar.

    obrigado novamente e desculpe.


    .................................................................................
    Daluque

    Office 2003
    avatar
    Daluque
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 175
    Registrado : 06/03/2012

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  Daluque em 13/10/2016, 00:40

    Obrigado amigos, acabei dando um jeito de fazer os testes em casa mesmo.
    deu certo.


    .................................................................................
    Daluque

    Office 2003
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5839
    Registrado : 15/03/2013

    [Resolvido]Concatenar campo com nome e conteúdo Empty Re: [Resolvido]Concatenar campo com nome e conteúdo

    Mensagem  ahteixeira em 13/10/2016, 11:24

    Olá, obrigado pelo retorno.
    Os utilizadores do fórum agradecem.
    Abraço
    klaytontome
    klaytontome
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 19/03/2017

    [Resolvido]Concatenar campo com nome e conteúdo Empty Concatenar campo com nome e conteúdo

    Mensagem  klaytontome em 31/3/2017, 01:28



    sensacional..................... cheers

      Data/hora atual: 20/4/2019, 21:49