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]ajuste automático de dados num campo de texto

    avatar
    phflogic
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 42
    Registrado : 11/10/2012

    [Resolvido]ajuste automático de dados num campo de texto Empty [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  phflogic 3/12/2013, 16:47

    Boa tarde.
    Tenho um relatório que vai servir para imprimir uma ficha de identificação com base em dados fornecidos por um formulário. Pretendo que um dos campos do relatório mostre uma listagem de vários nomes, cujos dados são fornecidos por 10 campos diferentes no formulário (nome1, nome2, nome3, etc.). Gostaria que o campo do relatório sofresse alguns ajustes automáticos, de modo a ficar devidamente centrado no espaço correspondente na ficha impressa. Ou seja:

    1º Pretendo juntar os 10 nomes num único campo, de maneira a que cada nome fique numa linha, independentemente do tamanho em caracteres. Atualmente o que acontece é que o campo começa a ser preenchido e os nomes ficam todos seguidos, separados por virgulas. É isto que pretendo evitar. Quero que o primeiro nome fique na primeira linha, o segundo nome fique na segunda linha e assim sucessivamente até ao décimo nome na décima linha.

    2º Pretendo que o campo tenha um ajuste vertical automático, fixado no centro, tal como acontece com as células duma tabela no word. Ou seja, atualmente o campo vai variando automaticamente mas a partir do topo da folha para baixo. O que quero é que o campo fique sempre centrado verticalmente na folha, variando automaticamente consoante a quantidade de nomes registados.

    Agradeço pois todas as dicas sobre este assunto, se houver resolução possível, claro.
    Obrigado a todos.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  criquio 3/12/2013, 17:17

    Não tem como fazer isso no momento do cadastro? Ao invés de separar por vírgula na hora de cadastrar, colocar em linhas. Aí seria só colocar a propriedade Auto expandir do campo como Sim no relatório.


    .................................................................................
    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.

    avatar
    phflogic
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 42
    Registrado : 11/10/2012

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  phflogic 3/12/2013, 17:26

    Boas. Obrigado pela resposta.
    Talvez me tenha expressado mal. No registo (cadastro) cada nome fica num campo diferente (nome1 - nome2 - nome3 - etc. etc.). Quando passo os dados para o relatório, junto os 10 campos do formulário num único campo do relatório, através da expressão "&". Aqui, para separar cada campo "nome" uso uma virgula. Queria utilizar algo do tipo "br /br".
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  criquio 3/12/2013, 17:37

    Você faz isso na origem do campo, certo? Basta colocar cada um em uma linha normalmente:

    =[NomeDoCampo1] & "
    " & [NomeDoCampo2] & "
    " & [NomeDoCampo3] & "
    " & [NomeDoCampo4]


    .................................................................................
    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.

    avatar
    phflogic
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 42
    Registrado : 11/10/2012

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  phflogic 4/12/2013, 10:19

    Bom dia
    Obrigado pela dica, Criquio. Afinal uma coisa simples...LOL.
    Agora falta-me a segunda questão: ajuste vertical automático do campo, para que quando o campo não está totalmente preenchido, os nomes apareçam centrados verticalmente. Não confundir com campo ampliável. O que pretendo é um campo com tamanho definido e com os registos centrados.
    Uma vez mais obrigado
    Um abraço
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  criquio 4/12/2013, 15:49

    Pelo que entendi serão sempre dez nomes, certo? Se for, você pode deixar esse campo já na altura certa.


    .................................................................................
    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.

    avatar
    phflogic
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 42
    Registrado : 11/10/2012

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  phflogic 4/12/2013, 17:04

    Boa tarde, Criquio.
    Não. Não são sempre dez nomes. A quantidade de nomes é variável e no máximo podem ser dez. Veja o anexo. o que pretendo é que os nomes dos inumados fiquem centrados verticalmente por cima do numero em azul. Presentemente a listagem de nomes fica alinhada pelo topo do campo.
    Um abraço
    Anexos
    [Resolvido]ajuste automático de dados num campo de texto Attachmentficha_modelo.pdf
    Você não tem permissão para fazer download dos arquivos anexados.
    (53 Kb) Baixado 20 vez(es)
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  criquio 5/12/2013, 13:39

    Tente utilizar o "Ao formatar" da seção Detalhe para somar um determinado número na altura a cada campo preenchido. Acredito que sempre terão os dez campos mas nem todos estarão preenchidos, certo? Coloque algo como Contar na propriedade "Marca" da aba "Outra" dos campos envolvidos e, no evento "Ao formatar" da seção "Detalhes", algo assim:

    Código:
    Dim C As Control, N As Integer

    For Each C In Me.Controls
        If C.Tag = "Contar" Then
            If Not IsNull(C) then
                N = N + 300
            End If
        End If
    Next

    Me.NomeDoCampo.Height = N


    .................................................................................
    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.

    avatar
    phflogic
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 42
    Registrado : 11/10/2012

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  phflogic 5/12/2013, 16:47

    Obrigado Criquio, pelo seu tempo.
    Creio não haver forma de resolver este caso. Tenho pesquisado na WEB, encontrei mais gente com o mesmo problema e ninguém o conseguiu ainda resolver. Não se consegue fazer com que o texto, independentemente do seu tamanho, fique centrado horizontal e verticalmente, tal como acontece numa célula do Excel. Acho que a solução passa por imprimir o relatório através do Word.
    De qualquer modo, valeu o esforço.
    Obrigado uma vez mais
    Um abraço
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  criquio 5/12/2013, 17:03

    Acho que não entendi bem então, pois dentro do que entendi deve funcionar do jeito que mencionei. Você não quer que o campo fique com a altura ajustada ao número de linhas?


    .................................................................................
    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.

    avatar
    phflogic
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 42
    Registrado : 11/10/2012

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  phflogic 6/12/2013, 12:31

    Boa tarde
    O que pretendo é que o texto inserido dentro do campo, quer ocupe 1 linha, quer ocupe 2 ou 3 ou até mesmo as 10 linhas, fique sempre centrado tanto na horizontal como na vertical (tal como acontece com uma célula numa tabela do Word ou uma célula do Excel. O campo, terá sempre o tamanho definido nas suas propriedades (18 cm de largura e 7 cm de altura).

    Tal como no exemplo que mostro (uma tabela do Word)

    Obrigado
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]ajuste automático de dados num campo de texto Empty Re: [Resolvido]ajuste automático de dados num campo de texto

    Mensagem  criquio 6/12/2013, 19:11

    Então o que você precisa na verdade é alinhar o texto verticalmente em um campo de altura fixa, certo? Ou seja, esse campo não vai sofrer alteração na altura independente da quantidade de linhas, certo? Se for isso, podemos usar duas propriedades que a caixa de texto possui: TopMargin(Margem do topo) e TextHeight(Altura do texto). Dividindo a metade da altura da caixa de texto pela metade da altura do texto, definimos a margem superior igual à margem inferior e o texto deverá ficar centralizado verticalmente no campo:

    Código:
    Me.NomeDoCampo.TopMargin = (Me.NomeDoCampo.Height / 2) - (Me.TextHeight(Me.NomeDoCampo) / 2)
    Dependendo o tipo de fonte e o tamanho da letra, pode ser necessário fazer algum ajuste, como diminuir ou aumentar alguma coisa no final do cálculo.


    .................................................................................
    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.


      Data/hora atual: 27/1/2023, 04:49