[Resolvido]Contagem de registos numa consulta

Boa noite pessoal!
Tenho andado aqui com a cabeça a roda por causa da contagem de registos numa consulta.

Eu fiz uma consulta onde o objectivo é apenas aparecer as vendas do dia, assim sendo eu pus os campos "CodVenda" e "Data de Registo" nesta consulta, e na "Data de Registo" pus como Critério "Data()" para me dar as vendas do dia.

Visto que seremos várias pessoas a fazer vendas, queria por uma celula no formulário que me fizesse a contagem automática dos registos dessa consulta, dando assim as pessoas a informação de quantas vendas temos no total.

Como devo proceder e qual o critério que devo utilizar na consulta?
Ou poderei fazer logo isso no formulário?

obrigado

O ideal era fazer isso num relatório. Torna-se visível no ecrã ou na impressora e não ocupa espaço na memória.

Veja esse exemplo

Temos uma tabela, 1 consulta, 1 formulário para introdução de datas e 1 relatório poara mostrar os dados.

Resultado: Usamos quase todos os objectos, vamos definir a data em que queremos ver os dados, no ecrã ou no papel, fechamos e libertamos a memória.

Sim isso eu sei como funciona...e é uma boa opção para fazer uns relatorios.
Neste caso eu desejo um campo que diga a pessoa quantas vendas tem a equipa naquele dia, até aquele momento.
Ou seja, imagina que abres o formulário e ha um campo que diz "Vendas Equipa", no inicio do dia esta lá escrito "0", ja ao meio do dia estara "30" e no final "70". Ou seja, o campo vai actualizando a medida que se vao fazendo vendas....e na "frmHome" do Assitente iria ter esse campo.

(espero nao ter sido confuso)

Obrigado

Então faça isso no formulário. As consultas são o melhor de uma BD mas, devem ser apenas as estritamente necessárias e mais nada, pois aumentam o tamanho da BD entre outras consequências. Se fizer isso no formulário os dados estão visíveis e evidentemente que actualizados.

E como faço as restrições?
Sinceramente nao sei como fazer :S

Pois, isso está a funcionar em rede também, não é?

Sim, está. Rede de empresa. Acho que até certa forma seria mais facil, para coisas futuras como por exemplo, a soma das vendas da propria pessoa, tanto do mes como as vendas diárias.

Vou-lhe dar uma sugestão de como talvez eu faria isso.

Consulta º formulário com escolha das datas e selecção do nome do funcionário e ou abria a consulta para cada um, ou de um modo mais profissional mostrava os dados no ecrã ou na impressora.

Nao entendi, desculpe...
Seria algo de um formulário para cada um?

Não. Seria um formulário único para escolher as datas de vendas, incluindo a do dia e uma caixa de combinação para seleccionar o funcionário. Os dados seriam apresentados no ecrã ou poderiam ser imprimidos.

Nao da para restringir ao dia e ao mes?
Seria mais facil....O resto será para o Super-Visor tirar os seus proprios dados, inserindo o periodo que deseja....

Dá para o que você quizer. Até posso colocar aqui um exemplo, mas amanhã porque hoje vou terminar a minha intervenção no fórum. Compreenda que estou super cansado e não leve a mal.

Claro que nao levo nada a mal.
Isto não tem tempo para ser feito e o objectivo é aprender, assim sendo devagar se vai ao longe.
Bom descanso! Ate amanha a todos

Aqui vai o exemplo. Se o entender vai poder adaptar. Qualquer coisa apite.

Vou então ver Vieira.
Grande Abraço e obrigado

Qualquer coisa apite. Bom trabalho

Vieira, realmente não é bem isto de que estou a falar, mas entendo.
Isto é bom para o Super-Visor poder fazer os relatótios em relação a nosso prestação como vendedores.

ha possibilidade de por aqui uma imagem retirada do meu PC sem ter de a alojar?
Assim mostrava-te o que pretendo fazer...acho que seria mais facil.

Penso que a imagem tem que ser alojada. Se você não quer fazer da maneira que eu lhe disse, então faça com uma consulta. Pode enviar a imagem para o meu email.

Vieira, enviei um e-mail para voce com a minha base de dados e a explicar mais ou menos o que pretendo, acho que vendo a base de dados sera mais facil entender.

Obrigado

Uma caixa de texto vazia no seu formulario

Private Sub Form_Current()
Dim strConta As Long
strConta = DCount("*", "SuaConsulta")
Me.SuaCaixaTexto.Value = strConta
Me.SuaCaixaTexto.Requery
End Sub

Boa tarde Ricardo,
Diz-me algo, eu na zona que dizes
"Me.SuaCaixaTexto.Value = strConta
Me.SuaCaixaTexto.Requery"
eu pus no nome da caixa onde quero que isso apareça, são iguais para as duas?
Obrigado

São iguais para as duas

Pois, mas nao esta a fazer contagem...

eu pus assim no VBA

Private Sub experiencia2_Current()
Dim strConta As Long
strConta = DCount("*", "data")
Me.txtDiaEquipa.Value = strConta
Me.txtDiaEquipa.Requery
End Sub

Evidente que não. Aonde está a consulta para fornecer os dados para a contagem?

A consulta tem o nome de "data"

strConta = DCount("*", "data")

Veja este tópico e pense bem quando se faz um projecto.

http://maximoaccess.forumeiros.com/t198-palavras-reservadas-do-access

Data é uma palavra reservada do access

Ops, ao mesmo tempo, Ricardo. É isso, não pode colocar palavras como Nome, Valor, Data e outras (consulte o link que o Ricardo lhe deu).

Ok, vou ver esse link e desculpem a minha burrisse....

Nem tem que pedir desculpa, nem é burrice, todos andamnos aprender e aprendemos uns com os outros

Ainda e uma boa quantidade de palavras, mas na maioria sao mesmo expressoes o que facilita.

eu ja fiz a alteração e nao fez nada...
em vez de "data" pus "venda" e ele nao vai fazer a contagem...
eu na consulta tenho apenas as dois campos "Codvenda" e "data de registo".

É estranho, com "On Got Focus" ele faz a contagem mas com a abertura do formulario nao... :/

veja o simples com o Grande JPaulo diz


http://www.speedyshare.com/files/27450886/Sardao.rar

Exacto, a questão aqui era o Form_Load()
e o Form_Currente ()

Como nao tinha o Form_Load() nao estava a funcionar, pois nao estava a actualizar, penso eu...
Mas sim, agora ja esta a funcionar

Nao sei se e pedir muito, mas ja que estamos a falar disto, ha outro campo identico a este, mas com restrição de User que esta logado na rede. Devo por como Critério na consulta, ou é atraves de codigo aqui no VB?

Obrigado

não entendi, detalhe por favor.

Tenho um campo que sao as vendas totais da equipa (foi o que se resolveu agora, ele faz a contagem total das vendas do dia).
Agora tenho outro campo que pertence as vendas apenas do User que esta logado.
Como fazer essa restrição?

Ou faz uma nova consulta já filtrada pelo user logado, ou aplica criterio se o user já aparecer na consulta e no form, por exemplo;

DCount("*", "SuaConsulta", "[User] = '" & Me.User & "'")

Correcto, deu prefeitamente!
Muito obrigado a todos pela vosso colaburação! Vou deixar aqui o codigo final ja com a restrição User para que alguem possa utilizar posteriormente! Mais uma vez, obrigado a todos!


Private Sub Form_Current()
Dim strConta As Long
strConta = DCount("*", "VendaEquipaDia", "[User] = '" & Me.txtutilizador & "'")
Me.txtDiaUser.Value = strConta
Me.txtDiaUser.Requery
End Sub

txtutilizador (campo onde esta o nome do User)
VendaEquipaDia (nome da consulta)
txtDiaUser (Nome do celula onde queremos que apareça o resultado)

Mais uma vez, obrigado a todos!