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

    Pegar somente digitos de parte de um registro.

    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    Pegar somente digitos de parte de um registro. Empty Pegar somente digitos de parte de um registro.

    Mensagem  teboman 21/9/2017, 17:53

    Boa tarde pessoal, estou fazendo um botão para abrir o diretório específico de um determinado registro no servidor porém os diretórios são separados por milhar (12000+, 13000+, 70000+...).
    Imaginem o seguinte.
    Tenho um diretório no servidor com documentos escaneados dos clientes e nossa organização funciona da seguinte forma, de 10000 até 14000 são ações Cíveis e de 70000 até 73000 são trabalhistas etc.
    Porém dentro das pastas respectivas de ações são separadas por milhar conforme citei, portanto gostaria que o parametro para abertura da pasta fosse determinado com os 2 primeiros digitos do campo PASTA para o programa saber que se for abrir a pasta 12600 ele teria que ir na pasta 12000+ e assim por diante.
    É possível fazer isso? Ou tem alguma forma melhor para isso ser feito?

    agradeço desde já e estou a disposição.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    Pegar somente digitos de parte de um registro. Empty Re: Pegar somente digitos de parte de um registro.

    Mensagem  FabioPaes 21/9/2017, 18:02

    Amigo, se quer pegar apenas os 3 Primeiros Dígitos, utilize a função nativa Access:

    Left(NomeCampo,3)

    Retornará os três primeiros Dígitos do Campo informado.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    Pegar somente digitos de parte de um registro. Empty Re: Pegar somente digitos de parte de um registro.

    Mensagem  teboman 22/9/2017, 12:06

    Cara muito obrigado, deu certíssimo, o engraçado que ele ta abrindo a pasta porém ta dando erro, eu tenho certeza que estou fazendo tratamento de erro incorretamente. Tem como me dizer onde estou errado? Meu codígo está assim

    Private Sub cmdpastadigitalizados_Click()
    On Error GoTo PastaInexistente_Err

    Dim strDiretorio As String
    Dim strPasta As String
    Dim strFaixaPasta As String

    strTipoAcao = Forms!FormProcessos!Ação
    strPasta = Forms!FormProcessos!Pasta
    strFaixaPasta = Left(strPasta, 2) & "000+"


    strDiretorio = "\\00administrador\arquivos digitalizados\3 Indenização - Cível\" & strFaixaPasta & "\" & strPasta
    Application.FollowHyperlink strDiretorio

    PastaInexistente_Err:
    MsgBox "Pasta não encontrada nos digitalizados"
    MsgBox Err.Description

    End Sub

    Edit: Fui testar com faixa 13 e deu erro de Uso de "Null" inválido.
    Edit 2: Descobri que só da o erro Null se o numero da pasta contiver 0 no meio Ex: 13508, se eu coloco 13345 ele vai normal depois dos erros
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    Pegar somente digitos de parte de um registro. Empty Re: Pegar somente digitos de parte de um registro.

    Mensagem  FabioPaes 22/9/2017, 20:13

    Posta foto indicando alinha do erro...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    Pegar somente digitos de parte de um registro. Empty Re: Pegar somente digitos de parte de um registro.

    Mensagem  teboman 28/9/2017, 19:49

    To tentando fazer dar erro mas agora não vai kkkkkkkkk
    Mas ele sempre me da a mensagem de como se tivesse erro mesmo sem dar, não me aparece a opção depurar simplesmente aparece um dialogo escrito do MsgBox e uma caixa em branco. Oque será que está incorreto?

    Conteúdo patrocinado


    Pegar somente digitos de parte de um registro. Empty Re: Pegar somente digitos de parte de um registro.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 15:41