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

    Gerar valores a direita depois de espaços

    avatar
    vaggnersf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 47
    Registrado : 30/07/2012

    Gerar valores a direita depois de espaços Empty Gerar valores a direita depois de espaços

    Mensagem  vaggnersf 20/12/2012, 15:56

    Estou tentando gerar em VBA um arquivo em txt com 14 caracteres mais a hora que gero ele colocar os numero que tenho antes e depois preencher o restante dos campos com espaço.

    Gostaria que antes ele colocasse os espaços e depois o valor que tenho, assim contando o total com valor e espaço daria os 14 caracteres.

    Exemplo como esta ficando:

    12410.20......

    124,21.........

    Quero que fique assim:

    ......12410.20

    ........124.21

    Abaixo segue o código que estou usando para gerar os valores.

    Código:
    s4 = Replace(Format(Tbl!valor), ",", ".")
    s4 = s4 & Space(14 - Len(s4))
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Gerar valores a direita depois de espaços Empty Re: Gerar valores a direita depois de espaços

    Mensagem  criquio 20/12/2012, 17:02

    Try this way:

    Código:
    s4 = Replace(Format(Tbl!valor), ",", ".")
    s4 = Space(14 - Len(s4)) & s4


    .................................................................................
    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: 21/11/2024, 17:35