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]Separar texto

    avatar
    Convidado
    Convidado


    [Resolvido]Separar texto Empty [Resolvido]Separar texto

    Mensagem  Convidado 18/11/2014, 11:25

    Bom dia,

    Gostaria de poder isolar um determinado valor num caminho e coloca-lo num campo.
    EX:
    D:\rob\PDF\301092998\000010\Excel - TC5388-R1-00002-301092998-KATE - 10000%.xls

    O valor que queria isolar era 00010 e ele situa-se sempre na mesma posição.

    Agradeço...
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Separar texto Empty Re: [Resolvido]Separar texto

    Mensagem  Assis 18/11/2014, 11:33

    Bom dia

    Será que vai ajudar ?

    http://maximoaccess.forumeiros.com/t12244-resolvidoseparar-parte-numero-da-direita-para-esquerda?highlight=direita


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidado
    Convidado


    [Resolvido]Separar texto Empty Re: [Resolvido]Separar texto

    Mensagem  Convidado 18/11/2014, 11:44

    Bom dia grande Assis,

    Não estou conseguindo com código que me orientou.

    D:\rob\PDF\301092998\000010\ = caminho onde se encontra o ficheiro.
    Excel - TC5388-R1-00002-301092998-KATE - 10000%.xls = Nome ficheiro

    Só queria mesmo o valor que se encontra no caminho = "00010"

    Vou tentando.....
    avatar
    Convidado
    Convidado


    [Resolvido]Separar texto Empty Re: [Resolvido]Separar texto

    Mensagem  Convidado 18/11/2014, 11:59

    Bom dia,

    resolvido.... codigo um pouco confuso mas funcionou. Laughing Laughing Laughing Laughing

    Dim x as string
    Dim Separar2 As Variant

    x=D:\rob\PDF\301092998\000010\Excel - TC5388-R1-00002-301092998-KATE - 10000%.xls
    Separar2 = Split(x, "\")
    Text1001 = Separar2(4)

    Obrigado ....
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Separar texto Empty Re: [Resolvido]Separar texto

    Mensagem  Assis 18/11/2014, 12:57

    Quando a gente precisa tudo se torna mais fácil
    Obrigado pelo retorno,
    Abraço



    .................................................................................
    *** Só sei que nada sei ***

    Conteúdo patrocinado


    [Resolvido]Separar texto Empty Re: [Resolvido]Separar texto

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 14:19