[Resolvido]Abrir relatório pelo mes e ano

Boa tarde gente,neste projeto que estou a desenvolver,gostaria de escolher o ano, e ao clicar no mês abrisse o relatório RelMensal da quele mês e ano.

dropbox.com/s/ifp3h0emc5svo6s/TesteMEI2Ultimo2.rar?dl=0

Consegui no formReceita, ao escolher o ano na comb em cima e clicar no botão Janeiro, abro o relatório no ano certo,mas no mes ta dificil..

dropbox.com/s/ub23c7tk49kip4o/TesteMEI2Ultimo%203.rar?dl=0

Kynan

Eis teu projeto.

Veja a comboMes e o Botão visualizar Relatório.


{ }'s

Balem

Ola noob,por ai até tava funcionando,o que gostaria era no formReceita nos botões janeiro,fevereiro .....mas se estiver complicado fica assim mesmo.

Kaynan

Eu atualizei o arquivo da mensagem nº 3

Fiz alterações nos 2 botões, janeiro e fevereiro, os demais deixo pra você fazer.

Veja que alterei também o período de apuração,  a texto29.

Balem

O mes e o ano filtra certinho,só não aparece os valores e totais no relatório,veja se filtrar pelo FormCombo 2019 janeiro da o resultado certo, mas neste outro não.

Kaynan

Já sabia que iria falar sobre isso.

Deu-se o trabalho de examinar o código?

Percebeu que mudei o nome da combobox  combAno para cboAno?

Chegou a examinar as caixas de texto do relatório?

Em suma, O que pediu pra eu fazer, eu fiz, que era abrir o relatório do mês e ano.

E isso está provado na caixa de texto  texto29 do relatório.

Agora você tem que arrumar o código das caixas de texto do relatório.

Balem

Mas bha então deixa comigo.

Não deu

=Nz(DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Não' and [Ano]=[Formulários]![FormReceita]![CboAno] and [NomeMes]=[Formulários]![FormReceita]![CboAno]");0)

Caro Amigo,

Olhe esse FormComboAnoMes e veja se é isso que queres.
Obs. Usando só consultas nas combos.
Abraços

Esse é igual a do FormCombo funciona perfeitamente,mas oque gostaria é no FormReceita escolher o ano na combo e clicar no botão Janeiro,Fevereiro,Março.....e abrir o relatório ja certinho,mas se não der não tem problema.
Obrigado FInformatica.

Caro Amigo,

Desse modo que fiz, quando você escolhe o ano ele já filtra e só exibe na combo do mês o que realmente existe na tabela. Se não existir determinado mês em determinado ano ele não exibe. Acho que fica mais completo.
Com os botões foi o que nosso amigo Noob fez. Não serviu?

Abraço

É esses dos botões no FormReceita que eu quero,que não conseguimos fazer.

Kaynan

Eu criei uma textbox  para receber o mês (txt_Mes)do botão clicado para facilitar no código, ele está visível agora ,mas depois tem que deixar ele invisível.

Não mexi no relatório ainda.

Os valores que devem ser retornados no relMensal são esses que estão relacionados no subformulario?

Sim são esses mesmos

Será que você pode se dar ao trabalho de enviar os valores, que vc deve saber de cor ?

Não entendi, se os valores estão no formReceita é escolher o mes e depois o ano nas combo que aparece embaixo.
Ou eu to ruim da cachola.

Vamos lá

Ao clicar nos botão dos meses, abrimos o relatório, como vc está pedindo.

Mas então, não deveria atualizar os campos do formulário frmReceita também?

Se sim, então então ficará fácil acertar o relatório.

Amigo, entenda, você criou o projeto e só você sabe como ele deve funcionar.

Quando pedir ajuda, descreva exatamente onde está o problema e o que pretende.

Assim, voce escolha na Combo Mês o mes de Março ta, depois na combo Ano o ano 2021 vai aparecer nas cx texto em baixo, alguns valores,esses valores estão nas cx texto Serviço - Comércio - Industria.
220,00 35,00 32,00 esses são com nota fiscal
310,00 35,00 5,00 sem nota fiscal
Totais 530,00 70,00 37,00
É esses valores que deve aparecer no relatório.

Se são esses os valores da textbox na parte verde do formulário,

pra que servem os botão de meses azuis e a cboMes no cabeçalho do formulário?

E porque vc se ateve nesses botões?

Bom por hj paro por aqui, tenho outros afazeres.

Amanhã continuo e vejo tua resposta.

Mas é nestes botões azuis que quero clicar, abrir o relatório com os valores em verde que enviei aí,é isso que quero.
E é uma combo ano CboAno que esta no cabeçalho do formulário.Escolho o Ano e clico nos botões de meses e abrir o relatório.

Eis teu projeto Kaynan

Como de costume, deixo pra você terminar os botões e os controles do RelMes

Divirta-se

KKKK eu dou trabalho pra vcs heim,mas ainda não é do jeito que pensei.
Esse que mandou tenho que preencher as duas combo. ano e mes para depois ir no cabeçalho, escolher o mesmo ano e o mes pra abrir o relatório.
O que quero é só preencher a combo ano do cabeçalho e clicar no mes do cabeçalho e aí abrir o bendito relatório.

Olha se não for possível é dizer que para de encomodar.

E por que não falou isso antes, que era pra ignorar duas combos da parte verde?

Então, agora está fácil pra vc fazer:

Pegue os códigos das combos da parte verde e coloque-as cada qual na combo cboAno e na função botaoAtivo,

depois do End If (lógico!) e antes do comando para abrir o relatório.

Bem vc já deve saber o porquê disso, certo?

Mas bha essas combo da parte verde não tem códigos.

Nas combos tem, pra poder preencher as caixas de textos verdes com os valores

Do teu projeto:


Private Sub CombAno_AfterUpdate()
Me.Refresh
Me.Requery
End Sub

Private Sub CombMes_BeforeUpdate(Cancel As Integer)
'Me.Refresh
Me.Requery

End Sub

Olha da erro,e eu ja cansei desse bendito projeto.Apesar de eu ser meio careca ja me arripiou o cabelo.;

Kaynan

Eis teu projeto!

Os botões azul estão desativados, quando colocar o ano na cboAno, irá ativar
apenas os botões dos meses que tem no ano dessa combo.


- Substituir a CombAno pela cboAno e a CombMes pela txt_Mes nas caixas de texto verdes
 no form e no relatorio RelMensal2
- As combAno e CombMes, pode deletar. estão desativadas.
- completar o resto dos botão azuis, veja exemplo num dos 3 primeiros.



Balem

Noob do céu bem melhor que esperava,só no relatório o período de apuração deu erro.

Isso é muito fácil de arrumar, manim

Vamos que vamos, abra lá e analise o que mudou

De onde no formulário irá pegar o mês para exibir no relatório?

Eitaa pelo menos isso eu consegui.

=[Formulários]![FormReceita]![txt_Mes] & " / " & [Formulários]![FormReceita]![cboAno]

Agora vou arrumar o restante e depois fecho o tópico.
Amigo véio, sem palavras.
Deus te proteja e te cuide sempre.

Perfeito,tudo funcionando noob,obrigado a vc e ao amigo FInformática, sei que dei bastante trabalho a vcs,mas creio que é mais um aprendizado pra gente.
Parabéns pela paciencia de vcs,fiquem com Deus e se cuidem.

Kaynan

Que bom que conseguimos!

Deixei pra você terminar, para ver o código e aprender.

Me deve uma caixa de latinha de cerveja!!

Zero Grau!

Veínho não pode tomar cerveja com álcool

Boa sorte!

Balem

Veinho o que! do jeito que ta as idéias não passa de 40 aninhos.
Vou pega meu fusquinha e logo to ai com a carregado de cerveja Zero Grau.
Abraço.