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]separar numeros

    avatar
    NADIRONUNES
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 571
    Registrado : 30/08/2010

    [Resolvido]separar numeros Empty separar numeros

    Mensagem  NADIRONUNES 30/4/2012, 13:09

    tenho dois campos o dupl e o nnota eu uso o codigo Me.nnota = Left(Me.Dupl, 6) pra transferir os dados do dupl pra nnota mas ele ta buscando o numero errado.

    ex
    dupl:045845-1
    ele tem que puxar no nnota: 045845

    mas ele ta puxando assim nnota: 458451

    alguem pode me ajudar
    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]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  criquio 30/4/2012, 13:15

    Tente colocar, na linha Formato desse campo na tabela, assim: 000000


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


    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  Convidad 30/4/2012, 14:33

    Nadiro

    Experimente:

    Left(Me.Dupl, (instr(1,Me.Dupl,"-")-1))

    Acredito que Me.Dupl seja uma string, já que tem um traço de separação do controle.

    Abraços
    avatar
    NADIRONUNES
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 571
    Registrado : 30/08/2010

    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  NADIRONUNES 30/4/2012, 14:45

    a dupl nao e string e um campo e ta dando erro ainda
    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]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  criquio 30/4/2012, 14:55

    Try this way:

    Me.nnota = Format(Left(Me.Dupl, 6), "000000")


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

    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3883
    Registrado : 04/04/2010

    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  Avelino Sampaio 30/4/2012, 16:32

    Olá

    Tente assim:

    me!nnota = format(val(me!dupl),"000000")

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    NADIRONUNES
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 571
    Registrado : 30/08/2010

    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  NADIRONUNES 30/4/2012, 17:17

    nao deu ta buscano ainda o 1
    eu to fazendo isso e no formulario
    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]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  criquio 30/4/2012, 17:34

    É provável que tenha algo mais interferindo no processo. Você vai precisar disso como número para fazer cálculo ou algo do tipo? Acredito que não, certo? Nesse caso, talvez ajude se deixar o campo sem formato nenhum e, no código, tentar assim:

    Me.nnota = CStr(Left(Me.Dupl, 6))


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


    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  Convidad 30/4/2012, 18:37

    Muito estranho isso.

    Se o campo não é string, como explica o traço?
    Que tipo de campo é esse, pode dizer?
    Creio que enquanto não resolvermos esse traço "-", nenhum código já proposto irá funcionar.

    Abraços

    avatar
    NADIRONUNES
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 571
    Registrado : 30/08/2010

    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  NADIRONUNES 30/4/2012, 19:00

    formanto de entrada: 000000-0 ta assim e o campo e numero
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3883
    Registrado : 04/04/2010

    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  Avelino Sampaio 30/4/2012, 19:38

    Olá

    Então seu número tem no máximo 7 digitos e vc não conta com o último.

    tente:

    me!nnota = format(left(me!dupl, len(me!dupl)-1),"000000")



    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    NADIRONUNES
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 571
    Registrado : 30/08/2010

    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  NADIRONUNES 30/4/2012, 21:12

    obrigado a todos que ajudaram

    Conteúdo patrocinado


    [Resolvido]separar numeros Empty Re: [Resolvido]separar numeros

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/5/2024, 23:01