MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Montar nome de arquivo com base em valores dos campos

    Compartilhe
    avatar
    Marceff@bol.com.br
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 26/04/2011

    [Resolvido]Montar nome de arquivo com base em valores dos campos

    Mensagem  Marceff@bol.com.br em Dom 23 Abr 2017, 03:39

    Boa Note!!!
    A todos

    Tenho uma situação referente a automação na montagem do nome de arquivo baseado nos dados dos campos no formulário notas e após preenchidos esses campos qdo selecionado o campo Tipo de nota, o evento após atualizar desse campo deve avaliar 6 critérios diferentes devendo montar o nome do arquivo, porém não esta ocorrendo para todos os critérios, talvez seja a forma como criei a condição "if" ou a lógica esteja errada.

    Aqueles que puderem me ajudar, desde já agradeço.

    Deixo o link do aplicativo para melhor compreensão do que preciso - Descompactar na unidade C:\
    [Você precisa estar registrado e conectado para ver este link.]

    Abaixo os Critérios

    'Critério 1
    'Se TipoNota = Nota de Conserto ou Nota de Transferência + campo Identificação vazio, então o nome do arquivo será montado com as opções definidas mas sem o numero de identificação

    'Critério 2
    Se TipoNota = Nota de Conserto ou Nota de Transferência + campo Identificação preenchido, então o nome do arquivo será montado com as opções definidas e com o numero de identificação

    'Critério 3
    Se TipoNota = Nota de Retorno de Conserto + campo Identificação vazio, então o nome do arquivo será montado com as opções definidas mas sem o numero de identificação

    'Critério 4
    Se TipoNota = Nota de Retorno de Conserto + campo Identificação preenchido, então o nome do arquivo será montado com as opções definidas e com o numero de identificação

    'Critério 5
    Se TipoNota = opções pré-definidas + campo Identificação vazio, então o nome do arquivo será montado com as opções definidas mas sem o numero de identificação

    'Critério 6
    Se TipoNota = opções pré-definidas + campo Identificação preenchido, então o nome do arquivo será montado com as opções definidas e com o numero de identificação

    Att. Marcelino
    avatar
    CassioFabre
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 524
    Registrado : 18/01/2013

    Re: [Resolvido]Montar nome de arquivo com base em valores dos campos

    Mensagem  CassioFabre em Ter 25 Abr 2017, 18:08

    Bom dia,

    Eu pensaria em uma função da seguinte maneira (aqui coloquei incompleta, você deve acrescentar os critérios e campos que são necessários):
    Código:
    Private Function nomeArquivo()
        Dim nomeArquivo As String
        
        If Not IsNull(Me.TipoNota) = True Then
            nomeArquivo = Me.IDOS & " - " & Me.TipoNota
            
            If Not IsNull(Me.NDoc) = True Then
                nomeArquivo = nomeArquivo & " nº " & Me.NDoc
            End If
            
            If Not IsNull(Me.Equipamento) = True Then
                nomeArquivo = nomeArquivo & ""
            End If
            
            Me.NotaNomeArquivo = nomeArquivo
        Else
            MsgBox "Informe o tipo de nota!", vbCritical, "Erro"
            Me.NotaNomeArquivo = Null
            nomeArquivo = ""
        End If
    End Function

    Basta chamar a função no evento "Após Atualizar" da combo e de todos os campos que possam alterar o nome do arquivo.

    Edit: apesar de não ser o mesmo problema da sua dúvida, dê uma olhada em como montei o filtro neste tópico [Você precisa estar registrado e conectado para ver este link.]
    Abraço.
    avatar
    Marceff@bol.com.br
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 26/04/2011

    Re: [Resolvido]Montar nome de arquivo com base em valores dos campos

    Mensagem  Marceff@bol.com.br em Seg 01 Maio 2017, 16:04

    Obrigado CassioFabre, vou testar aqui e retorno em breve.
    avatar
    Marceff@bol.com.br
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 26/04/2011

    Re: [Resolvido]Montar nome de arquivo com base em valores dos campos

    Mensagem  Marceff@bol.com.br em Sex 12 Maio 2017, 00:48

    Boa Noite!!!

    Mais uma vez, obrigado CassioFabre pela sua orientação, testei conforme minha necessidade porém ocorre o mesmo comportamento como da forma que eu vinha fazendo, acredito que devido a quantidade de critérios a serem avaliados acabou que deixei complexo e então não consegui passar disso, mas então deixei a obrigatoriedade no formulário de preencher todos os campos para a formação do nome do arquivo assim ficou mais fácil e o código andou.

    Mas obrigado mesmo assim por sua disposição e ao fórum também, pois aqui consegui praticamente caminhar sozinho com as orientações, inúmeras dicas e exemplos disponibilizados que eu aplico em meu hobby.

    Abraço a todos.
    Att. marceff

      Data/hora atual: Sab 18 Nov 2017, 19:29