Início![[Resolvido]Ligar duas caixas de listagem Empty](https://2img.net/i/empty.gif)
Assis 20/2/2021, 14:36Boa tarde Amigos
Ler objetivo na imagem
Obrigado
![[Resolvido]Ligar duas caixas de listagem Sem_t179](https://i.servimg.com/u/f56/19/62/62/37/sem_t179.png)
Ler objetivo na imagem
Obrigado
- Anexos
![[Resolvido]Ligar duas caixas de listagem Attachment](https://2img.net/i/fa/attachment.png)
FeriadosPT.zip - Você não tem permissão para fazer download dos arquivos anexados.
- (91 Kb) Baixado 14 vez(es)
3 participantes
[Resolvido]Ligar duas caixas de listagem
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
.................................................................................
*** Só sei que nada sei ***
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá Assis,
Para o que pretende tem que existir uma relação entre a tabela Meses e Feriados.
A parametrização (modelagem) das tabelas é muito importante!
Por exemplo não precisava na tabela Feriados o campo semana, pois como já tem a DataFeriado é possivel calculr o dia da semana.
Quanto à questão, tem na tabela Meses o campo "mes" em texto e falta o ano.
Na minha opinião deveria ter o mês em número e adicionar o campo ano, depois se pretende mostrar na lista em entenso não terá problemas.
Ora tendo o mes e ano, será fácil mostrar na lista secundária ao selecionar o registo da primeira lista.
Que lhe parece?
Abraço
Para o que pretende tem que existir uma relação entre a tabela Meses e Feriados.
A parametrização (modelagem) das tabelas é muito importante!
Por exemplo não precisava na tabela Feriados o campo semana, pois como já tem a DataFeriado é possivel calculr o dia da semana.
Quanto à questão, tem na tabela Meses o campo "mes" em texto e falta o ano.
Na minha opinião deveria ter o mês em número e adicionar o campo ano, depois se pretende mostrar na lista em entenso não terá problemas.
Ora tendo o mes e ano, será fácil mostrar na lista secundária ao selecionar o registo da primeira lista.
Que lhe parece?
Abraço
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Bom dia Assis,
Então como ficou a situação.
Abraço
Então como ficou a situação.
Abraço
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Bom dia
Está preta
Está preta
.................................................................................
*** Só sei que nada sei ***
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá Assis,
Fiz algumas alterações à estrutura, adicionei uma consulta com campos calculados, veja:
![[Resolvido]Ligar duas caixas de listagem 0156](https://i.servimg.com/u/f84/19/61/75/43/0156.png)
O código, foi este:
E ainda alterei a origem das listas, veja se é o que pretende:
cld.pt/dl/download/14eeaef2-3486-4dbc-a2ce-4245b0890e62/FeriadosPT_rev.zip
Abraço
Fiz algumas alterações à estrutura, adicionei uma consulta com campos calculados, veja:
O código, foi este:
- Código:
Private Sub Lista0_Click()
Me.Lista.RowSource = "SELECT qyrFeriados.IdFeriado, qyrFeriados.DataFeriado, qyrFeriados.Semana AS [Dia Semana], " _
& "qyrFeriados.Descrição, qyrFeriados.iMes, qyrFeriados.iAno FROM qyrFeriados WHERE " _
& "qyrFeriados.iMes=" & Lista0.Column(7) & " AND qyrFeriados.iAno=" & Lista0.Column(8) _
& " ORDER BY qyrFeriados.DataFeriado;"
Me.Lista.Requery
End Sub
E ainda alterei a origem das listas, veja se é o que pretende:
cld.pt/dl/download/14eeaef2-3486-4dbc-a2ce-4245b0890e62/FeriadosPT_rev.zip
Abraço
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Teixeira
Na mudança de Ano as tabelas são apagados, e criadas automaticamente.
Será que vai continuara funcionar?
É que fiz aqui o teste e apago os dados das tabelas deste ano , elas são recriadas mas o filtro que o amigo fez deixa de funcionar.
![[Resolvido]Ligar duas caixas de listagem Sem_t181](https://i.servimg.com/u/f56/19/62/62/37/sem_t181.png)
Na mudança de Ano as tabelas são apagados, e criadas automaticamente.
Será que vai continuara funcionar?
É que fiz aqui o teste e apago os dados das tabelas deste ano , elas são recriadas mas o filtro que o amigo fez deixa de funcionar.
.................................................................................
*** Só sei que nada sei ***
FranklinJSP- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 462
Registrado : 25/02/2016
Boa tarde Assis
Em anexo
Saludos
Em anexo
Saludos
.................................................................................
Meu Português não é muito bom,
mas eu gosto de colaborar... em qualquer idioma
"Access... minha paixão"
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá a todos,
Aparentemente sim, efetue o teste no exemplo que disponibilzei.
Abraço
Aparentemente sim, efetue o teste no exemplo que disponibilzei.
Abraço
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Teixeira
Fiz o teste no exemplo do seu link.
Obrigado
Fiz o teste no exemplo do seu link.
Obrigado
.................................................................................
*** Só sei que nada sei ***
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Franklin
Estes valores devia ser preenchidos com a função " Sub CriaFeriados() "
![[Resolvido]Ligar duas caixas de listagem Sem_t182](https://i.servimg.com/u/f56/19/62/62/37/sem_t182.png)
Estes valores devia ser preenchidos com a função " Sub CriaFeriados() "
.................................................................................
*** Só sei que nada sei ***
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá a todos
Assis, partilhe então dados com outro ano para se testar.
O exemplo Franklin faz o calculo do mês ao clicar na Lista através do descritivo.
Relativamente ao Mes que exemplificou, nem era necessário na tabela, como demontrrei na mensagem nr. 5 pode ser calculado através da data.
Se tem um processamento dos feriados tudo deve funcionar.
Abraço a todos
Assis, partilhe então dados com outro ano para se testar.
O exemplo Franklin faz o calculo do mês ao clicar na Lista através do descritivo.
Relativamente ao Mes que exemplificou, nem era necessário na tabela, como demontrrei na mensagem nr. 5 pode ser calculado através da data.
Se tem um processamento dos feriados tudo deve funcionar.
Abraço a todos
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Boa tarde Teixeira
1º - abra a BD com a tecla Shift premida para confirmar nas 2 tabelas que as datas estão em 2020.
2º - Quando abrir o formulário, automaticamente são criados dados de 2021.
E como eu disse acontece o que está na mensagem nº 6
Obrigado
1º - abra a BD com a tecla Shift premida para confirmar nas 2 tabelas que as datas estão em 2020.
2º - Quando abrir o formulário, automaticamente são criados dados de 2021.
E como eu disse acontece o que está na mensagem nº 6
Obrigado
- Anexos
- FeriadosPT_revTeste2020.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (93 Kb) Baixado 22 vez(es)
.................................................................................
*** Só sei que nada sei ***
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá Assis,
A consulta que também coloque o numero do mes e do ano na tabela Meses
![[Resolvido]Ligar duas caixas de listagem 0158](https://i.servimg.com/u/f84/19/61/75/43/0158.png)
Abraço
A consulta que também coloque o numero do mes e do ano na tabela Meses
Abraço
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá Assis,
Como ficou a situação??
Abraço
Como ficou a situação??
Abraço
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Teixeira
O que se está a passar está na mensagem Nº 12.
No exemplo da mensagem 12 tem os feriados do Ano 2020.
Quando for aberto deteta que os feriados são do ano anterior, e então deleta tudo na tabela "Feriados" e cria os novos para 2021.
A partir daí ao clicar no Mês para ver os feriados desse Mês deixa de funcionar fica como mostra a imagem da mensagem Nº 6
Obrigado
O que se está a passar está na mensagem Nº 12.
No exemplo da mensagem 12 tem os feriados do Ano 2020.
Quando for aberto deteta que os feriados são do ano anterior, e então deleta tudo na tabela "Feriados" e cria os novos para 2021.
A partir daí ao clicar no Mês para ver os feriados desse Mês deixa de funcionar fica como mostra a imagem da mensagem Nº 6
Obrigado
.................................................................................
*** Só sei que nada sei ***
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Ola Assis,
A estrutura quando não é boa só complica o que é simples.
Ajuste o seu codigo com este e teste:
![[Resolvido]Ligar duas caixas de listagem 0160](https://i.servimg.com/u/f84/19/61/75/43/0160.png)
Abraço
A estrutura quando não é boa só complica o que é simples.
Ajuste o seu codigo com este e teste:
Abraço
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4628
Registrado : 06/11/2009
Obrigado Teixeira
.................................................................................
*** Só sei que nada sei ***
ahteixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7473
Registrado : 15/03/2013
Olá a todos,
Assis fico feliz por ter funcionado.
O exemplo partilhado na mensagem nr. 7 do colega FranklinJSP, também foi uma solução simples.
Será apenas necessário ajustar a consulta indicada a baixo:
![[Resolvido]Ligar duas caixas de listagem 0161](https://i.servimg.com/u/f84/19/61/75/43/0161.png)
Fica o desafio Assis, aguardamos que partilhe a solução.
Abraço a todos
Assis fico feliz por ter funcionado.
O exemplo partilhado na mensagem nr. 7 do colega FranklinJSP, também foi uma solução simples.
Será apenas necessário ajustar a consulta indicada a baixo:
Fica o desafio Assis, aguardamos que partilhe a solução.
Abraço a todos