[Resolvido]Nova numeração no subform a cada novo número do formulário.

Olá,

Pesquisei muito aqui no forum e na web uma forma de fazer a numeração automática no subform reiniciar a cada novo registro do Form.

O que pretendo é para o número 1 do Form, tenha 1, 2, 3, 4 no Subform e no 2 do form a numeração do subform inicie novamente no 1, 2, 3, 4...

O código que estou utilizando para a gerar os números sequenciais do Form é.

Código:

Private Sub Nm_comercial_AfterUpdate()

If Me.NewRecord Then
  On Error Resume Next
  Me!Num_Orc = Nz(DMax("Num_orc", "DB_orcamento"), 0) + 1
  End If

Conto com a ajuda de vós.

Boa tarde.
É necessário o código com a autonumeração ou isso é só para exibição mesmo?

Se for para exibição é simples.

Na propriedade da caixa de texto que irá exibir a numeração na fonte de controle digite: =1

Ainda em propriedades vá até a opção "Soma parcial" e escolha "Total".

Teste e retorne.

No aguardo.

Olá, Cláudio!

A questão é que preciso do número da sequência para concatenar em um relatório de envio da proposta ao cliente. Minha necessidade é gerar sequência de números, como exemplo a tabela abaixo, não estou conseguindo fazer com que o SequênciaOrcamento, seja auto numeração e reinicie a cada novo relatório.

NumeroOrcamento SequenciaOrcamento NumeroOrcamentoFinal
1                                   10                            1-10
1                                   20                            1-20
1                                   30                             1-30
1                                   40                            1-40
2                                   10                            2-10
2                                   20                            2-20
3                                   10                            3-10
3                                   20                            3-20
4                                   10                            4-10
5                                   10                            5-10
5                                   20                            5-20





Desde já agradeço a ajuda.

Boa tarde.
Você pode fazer da forma que postei e colocar um comando:

Código:


Seq_Orcamento = Contador 'Sua Caixa que faz a contagem


Pode colocar esse código no evento "Após atualizar" de qualquer campo do seu subform.

Aguardo retorno.

Cláudio, bom dia!

Acho que fui infeliz em dizer relatório, preciso desta sequência gravada na tabela e que seja gerada no sub formulário. A forma com que disse é somente para relatório?

Cumprimentos,

Bom dia.
Não. Tudo que te passei é pra formulário mesmo.
Essas funções você vai usar no subform do seu formulário.
Não prefere postar essa parte do projeto pra gente analisar?
Fica mais fácil de ajudar.

Cláudio,

Em anexo o projeto com as tabelas e formulários.

Desde já agradeço.

Cumprimentos.

Boa noite.
veja se é isso.

Coloquei um código do meu Amigo Avelino Sampaio chamado fncNumerar no SubForm e também uma caixa com nome "Item".

No campo "Num_molde" do subform no evento "Ao perder foco" eu coloquei o código:

Código:


Me.Seq_orcamento = Me.Item


Ou seja, todas as vezes que sair do campo ele copia o conteúdo da caixa Item e joga para o campo "Seq_orcamento".

Qualquer coisa adapte para seu uso.

Obs: Aconselho rever os Relacionamentos de tabelas, está meio confuso e também alguns campos da tabela "DB_Sub_orcamento"
estão com "Sim (Duplicação autorizada)" isto pode causar complicação no futuro.

Abraço

Bom dia, Cláudio!!

É isso mesmo que estava precisando, vou adaptar conforme modelamos aqui na empresa. E irei olhar os relacionamentos e os campos com duplicação autorizada.

Agradeço muito a ajuda e as dicas também, estou começando em desenvolvimento e a ajuda de vocês é muito importante para quem está iniciando, como eu.

Desculpe os horários é o fuso de + 4 horas.  

Cumprimentos,

Bruno Nunes

Bom dia.
Que bom que resolveu. Se precisar é só chamar que a gente tenta ajudar.

Não esqueça de fechar o tópico se foi resolvido.