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]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Compartilhe

    sultani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 20
    Registrado : 27/08/2012

    [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  sultani em Dom 04 Fev 2018, 10:49 pm

    Boa noite.

    Estou necessitando de vossa orientação.

    Cenário:
               1 -Tenho um Formulário Contínuo onde mostro uma tabela filtrada com vários de seus campos.
               2- Criei um campo denominado Txt_NumLinha,  nesse formulário contínuo.
               3- Para cada linha (ou registro)  apresentada nesse formulário contínuo, o campo Txt_NumLinha deve ter, sequencialmente, o número da devida linha, ou seja, Linha 1:Txt_NumLinha = 1,
                         Linha 2:Txt_NumLinha = 2,
                         Linha 3:Txt_NumLinha = 3 ,
                         E assim por diante....

    Pergunto:
                 Como resolvo isso (carregar no campo TxT_NumLinha, o número da devida linha)?



    Muito obrigado;
    Sultani.
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 827
    Registrado : 07/12/2011

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  tauron em Seg 05 Fev 2018, 10:02 am

    Veja este codigo (acredito que seja) do Mestre Avelino:

    cole este no vba do formulario:

    Public Function fncNumerar(frm As Form) As Long
    On Error GoTo TrataErro    
    With frm.RecordsetClone        
      .Bookmark = frm.Bookmark        
      fncNumerar = 1 + .AbsolutePosition    
    End With  
    Exit Function
    TrataErro:    
      If Err = 3021 Then fncNumerar = 0
    End Function

    Fonte de Controle do campo assim:

    =fncNumerar(]seufomulario])

    sultani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 20
    Registrado : 27/08/2012

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  sultani em Seg 05 Fev 2018, 10:27 am

    Bom dia Tauron.

    Sobre o Txt_NumLinha acima, deu erro.
    Ele ficou preenchido com o literal #Nome?

    Alguma ideia de onde está o problema?

    Na Fonte de Controle do campo coloquei =fncNumerar([Frm_Chamados]), onde Frm_Chamados é o formulário contínuo.



    Grato.
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 827
    Registrado : 07/12/2011

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  tauron em Seg 05 Fev 2018, 11:23 am

    So para um teste, mude o nome do seu campo de "Txt_NumLinha" para "Item", ou se preferir poste os objetos envolvidos.

    sultani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 20
    Registrado : 27/08/2012

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  sultani em Seg 05 Fev 2018, 11:46 am

    Oi Tauron.

    Fiz a modificação sugerida (nome do campo = Item) e infelizmente o erro persiste.

    Se tiver nova sugestão agradeço.

    Até mais,
    Sultani.
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 827
    Registrado : 07/12/2011

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  tauron em Seg 05 Fev 2018, 12:39 pm

    Tente assim na fonte de controle do campo:

    =fncNumerar([Formulário])
    ** copie e cole sem alterar**

    Tem como postar seu bd de preferencia em 2007

    sultani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 20
    Registrado : 27/08/2012

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  sultani em Seg 05 Fev 2018, 4:30 pm

    Olá Tauron.

    Tudo resolvido !
    Fui preparar o BD para te enviar (iria enviar só o essencial) e no Control-C Control-D da função, o script começou a funcionar!!!

    Acho que tinha alguma sujeira ou algo similar...

    Muito obrigado pela tua dica e paciência.

    Abração e ótima semana;
    Sultani.
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 827
    Registrado : 07/12/2011

    Re: [Resolvido]Formulário Contínuo - Como Numerar suas linhas sequencialmente ?

    Mensagem  tauron em Ter 06 Fev 2018, 12:25 pm

    O forum agradece pelo retorno.

      Data/hora atual: Sab 24 Fev 2018, 12:29 am