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

    [Resolvido]Contar itens em subformulário

    avatar
    Chamon Consultoria
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 266
    Registrado : 31/08/2012

    [Resolvido]Contar itens em subformulário Empty [Resolvido]Contar itens em subformulário

    Mensagem  Chamon Consultoria 25/4/2015, 17:59

    Olá amigos!

    Bd em Access 2007.
    Tenho um formulário chamado Frm_Vendas com um subformulário chamado Frm_Vendas_Sub_Produtos. O subformulário possui um campo "Num_Item" onde eu gostaria que a medida que eu fosse lançando os produtos, ele apresentasse a numeração de ordem crescente (1,2,3...) e quando fosse adicionada uma nova venda, essa numeração reiniciasse do 1.
    Ex:

    Venda 195
    1 - Produto A
    2 - Produto X
    3 - Produto C

    Adicionando uma nova venda:

    Venda 196
    1- Produto D
    2 - Produto T

    e assim por diante.

    Encontrei no Fórum uma resposta parecida com o que estou precisando, mas não entendi e nem consegui aplicar no subformulário.

    Alguém teria um exemplo para postar?

    Desde já agradeço!


    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Agravina 25/4/2015, 18:50

    Tente assim
    =contar(Num_item)
    avatar
    Chamon Consultoria
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 266
    Registrado : 31/08/2012

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Chamon Consultoria 26/4/2015, 12:30

    Obrigado Agravina, mas onde deve ser inserido esse comando?
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Agravina 26/4/2015, 14:04

    Coloca cxtexto no rodapé do subformulario.
    avatar
    Chamon Consultoria
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 266
    Registrado : 31/08/2012

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Chamon Consultoria 26/4/2015, 20:10

    Desculpe, não expressei muito bem. Vamos lá:

    O subformulário é aberto no modo Folha de dados, de forma que possam ser inseridas quantas linhas forem necessárias para cada venda. Assim, preciso que a quantidade de itens apareça em cada linha (conforme citei no exemplo) e não o total de itens no rodapé.

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1623
    Registrado : 18/07/2010

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Agravina 27/4/2015, 13:11

    Pode disponibilizar o BD?
    avatar
    Chamon Consultoria
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 266
    Registrado : 31/08/2012

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Chamon Consultoria 27/4/2015, 13:36

    Bom dia!

    Segue modelo.

    Abraço.
    Anexos
    [Resolvido]Contar itens em subformulário AttachmentBanco de Dados3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (33 Kb) Baixado 38 vez(es)
    avatar
    Chamon Consultoria
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 266
    Registrado : 31/08/2012

    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Chamon Consultoria 27/4/2015, 15:44

    Resolvido:

    Inseri na propriedade Fonte de controle do campo Num_Item: =Numero_Linha()

    E adicionei a função:

    Function Numero_Linha() As Long
    On Error Resume Next
    RecordsetClone.Bookmark = Bookmark
    If Err = 0 Then
    Numero_Linha = RecordsetClone.AbsolutePosition + 1
    End If
    End Function

    Obrigado pela atenção.

    Conteúdo patrocinado


    [Resolvido]Contar itens em subformulário Empty Re: [Resolvido]Contar itens em subformulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 08:07