[Resolvido]Função Dcount para um valor específico

Boa Tarde Pessoal tudo bem?

eu estou usando a função Dcount, mas gostaria que ela contasse um valor do campo específico, onde Cod_Setor = 'CONF. ESTOCAGEM'

Tentei de várias formas, mas até agora nao deu.

' neste caso me retorno a quantidade de registros preenchidos.
VerificaConf = DCount("Cod_Setor=", "[tbl Programacao de Processos]", "Cod_Prod_Ped=" & Me.Cod_Prod_Ped & "")


ja tentei colocar ... "Cod_Setor='CONF. ESTOCAGEM'"... ou ... "Cod_Setor=" & "'CONF. ESTOCAGEM'" ....
e nada....
OBS. o Cod_Setor é campo de texto mesmo.

Desde ja muito obrigado.

Tente assim:

DCount("Cod_Setor", "[tbl Programacao de Processos]", Cod_Prod_Ped='" & Me!Cod_Prod_Ped.Value & "'")

Boa tarde Harysohn

Eu tentei como falou mas continuou a mesma coisa, no caso ele me retorna todos os valores onde o Cod_setor nao esta nulo..... retornou o valor 6, mas só tem um registro preenchido com o texto "CONF. ESTOCAGEM".

vou tentar fazer ele contar de uma consulta, onde eu filtro... tive esta ideia agora... mas se tiver outra forma to no aguardo.

Você Desiste muito fácil!!!

DCount("Cod_Prod_Ped", "[tbl Programacao de Processos]", Cod_Prod_Ped='" & Me!Cod_Prod_Ped.Value & "'")

Obrigado mais uma vez

rsrs Desistir nunca... rsrs

Harysohn tentei como me falou, só tive que tirar as aspas simples porque o campo Cod_Prod_Ped é numerico e o COd_setor é texto.

VerificaConf = DCount("Cod_Prod_Ped", "[tbl Programacao de Processos]", "Cod_Prod_Ped=" & Me!Cod_Prod_Ped.Value & "")

o que preciso seria assim:
ele conta qtos registros tem o cod_prod_ped e destes qtos tem o Conf. Estocagem rsrs...

e deveria voltar o resultado 1 mas retorna como 6, pq é a qtde de registro com o mesmo cod_prod_Ped.

o texto CONF. ESTOCAGEM

é de qual campo?

Este texto é do Cod_Setor.

tipo ele pesquisaria assim?
onde o cod_prod_ped = o campo no meu form e o Cod_setor com o valor CONF. ESTOCAGEM.

com o cod_prod_ped dentro da tabela eu tenho 6 registros e destes 6 só um esta como CONF. ESTOCAGEM.

Vou te explicar o porque.

eu tenho uma tabela que traz programação de processos de itens(cod_prod_ped) e cada setor onde ira passar este produto esta mencionado no cod_setor.

dai preciso contar qtas vezes repete o setor... de conferencia de estoque. (este setor na verdade irá repetir no máximo uma vez, mas as vezes pode não aparecer.

Harysohn com a consulta deu certo.....entao vou dar o tópico como resolvido... Mas Obrigado pela a atenção... e desculpe o incômodo.

DCount("Cod_Prod_Ped", "[tbl Programacao de Processos]", Cod_Prod_Ped=" & Me!Cod_Prod_Ped.Value" And Cod_Setor=” Conf. Estocagem”)

Teste assim... porque no caso voce quer 2 criterios...

Voce quer o Co_Prod_pedido quando na lina o Cód_Prod_Ped For igual a caixatexto e o Cod_setor = Conf.Estocagem

Muito Obrigado Harysohn

Agora funcionou.... Perfeito....
Vou usar este mesmo... afinal fazer uma consulta para cada um dos botões seria +- umas 20 só rsrsrs...

Ajudou muito mesmo... Obrigado...

Desitiu fácil


Mas eu não!!!!




O Fórum agradece o retono

Bom trabalho amigão

rsrs ainda bem que você nao se deu por vencido.

Obrigado.

Harysohn.... Bom dia....de novo preciso de sua ajuda.

Estou tentando de novo, de acordo com nossa conversa anterior... sobre este mesmo assunto, mas em um lugar deu certo e nos demais não deu, a linha que estou tentando executar é a de baixo e ele sempre me retorna o valor 0 mas deveria, pelos dados que tenho na tabela, retornar pelo menos 1 e se uso o Dsum deveria resultar em 150. e mesmo assim só retorna 0 no dcount e em branco no Dsum. nao sei o que ocorre.


StaCol = DCount("[TotalRetornado]", "[tbl Exped e Acab]", Cod_Prod_Ped = " & Me!Cod_Prod_Ped.value" And Serviços = "1")

StaCol = Dsum("[TotalRetornado]", "[tbl Exped e Acab]", Cod_Prod_Ped = " & Me!Cod_Prod_Ped.value" And Serviços = "1")

Desde ja muito obrigado....

Tente retirar as aspas do "1"

StaCol = DCount("TotalRetornado", "[tbl Exped e Acab]", Cod_Prod_Ped = " & Me!Cod_Prod_Ped.value" And Serviços = 1)

Opa Obrigado pelo retorno, também fiz isso... e mesmo assim não adiantou.
ja mexi nas aspas tb deixando de outras formas...

StaCol = DCount("TotalRetornado", "[tbl Exped e Acab]", "Cod_Prod_Ped =" & "Me!Cod_Prod_Ped.value" And "Serviços =" & 1).

com aspas no final e no inicio, o engraçado é que se eu tirar o que tem depois do "and" ele conta certo. pensei que fosse por causa do ç em serviços, dai tentei com outros campos e nao deu certo.... e no caso anterior da "Conf. Estocagem" ainda funciona....

voce tem que ir testando mudando

tente substituit o And por & ou +

Tem varios erros nessa instrução.

Cod_Prod_Ped é numerico ou texto ?

Obrigado pela intervenção JP.. o objeto do tópico eu consegui resolver.. mas não estou a conseguir esse outro que ele me pediu no mesmo tópico..

Grato

Cod_Prod_Ped é Númerico.

StaCol = DCount("TotalRetornado", "[tbl Exped e Acab]", "Cod_Prod_Ped =" & Me!Cod_Prod_Ped & " And Serviços = 1")

Se funfar veja bem onde estava o erro.

Obrigado pelos retornos...

Harysohn... tentei conforme explicou, e não deu mesmo... ficou igual, tentei com o + e com o & e tb tentei mudando as aspas de algumas formas....

Obrigado JPaulo pela intervenção tb... vou testar conforme mandou.

Uau.. funcionou direitinho.... agora vem uma duvida, por que a linha do Harysohn funcionou antes e nao funcionou neste caso....
e se fosse texto,o campo serviços, ficaria igual?

Mais uma vez obrigado Jpaulo... e Obrigado Harysohn... pela a Ajuda....

e o erro estava nas aspas... complicadinho essas aspas... rsrrss

Neste caso não funfou por a instrução passada pelo Harr está mal, veja o que faltava a vermelho;

StaCol = DCount("TotalRetornado", "[tbl Exped e Acab]", "Cod_Prod_Ped =" & Me!Cod_Prod_Ped & " And Serviços = 1")

Se o Serviços fosse Texto teria de levar aspas simples;

StaCol = DCount("TotalRetornado", "[tbl Exped e Acab]", "Cod_Prod_Ped =" & Me!Cod_Prod_Ped & " And Serviços ='" & Me!Serviços & "'")

Nos DCount`s e DSum`s nunca utilize o blablabla.Value, o VBA é muito esquisito.

Obrigado mais uma vez JPaulo.

E Harysohn Muito obrigado pela força também.

Benditas aspas.. como falei a primeira eu consegui.. a segunda não.. mas ainda bem que temos nosso Mestre nas horas de tribulação...

Obrigado JP