[Resolvido]Alterar a Origem da Linha da Combo

Boa noite,

Tenho duas caixas de combinção relacionadas, "RECURSO" E "SERVICO".

Preciso alterar o Origem da Linha da Combo "SERVICO" de acordo com o valor da combo "RECURSO".

Se na Recurso tiver: 232 ou 252 tem que ser:

SELECT TabQuantitativo.CODSERVICO, TabQuantitativo.CODRECURSO, TabQuantitativo.VU, TabQuantitativo.TIPOEQUIPE, TabQuantitativo.DESCMODULO, TabQuantitativo.DESCBLOCO, TabQuantitativo.DESCSERVICO, TabQuantitativo.TIPOSERVICO, TabQuantitativo.UF, TabQuantitativo.VUComDesconto
FROM TabQuantitativo
GROUP BY TabQuantitativo.CODSERVICO, TabQuantitativo.CODRECURSO, TabQuantitativo.VU, TabQuantitativo.TIPOEQUIPE, TabQuantitativo.DESCMODULO, TabQuantitativo.DESCBLOCO, TabQuantitativo.DESCSERVICO, TabQuantitativo.TIPOSERVICO, TabQuantitativo.UF, TabQuantitativo.VUComDesconto
HAVING (((TabQuantitativo.CODRECURSO)=[Formulários]![FormTabMedicaoServicos]![SubFormTabMedicaoServicos2].[Formulário]![RecursoSubTabExecucao]))
ORDER BY TabQuantitativo.CODSERVICO;

Se tiver outros valores:

SELECT TabQuantitativo.CODSERVICO, TabQuantitativo.CODRECURSO, TabQuantitativo.VU, TabQuantitativo.TIPOEQUIPE, TabQuantitativo.DESCMODULO, TabQuantitativo.DESCBLOCO, TabQuantitativo.DESCSERVICO, TabQuantitativo.TIPOSERVICO, TabQuantitativo.UF, TabQuantitativo.VUComDesconto
FROM TabQuantitativo
GROUP BY TabQuantitativo.CODSERVICO, TabQuantitativo.CODRECURSO, TabQuantitativo.VU, TabQuantitativo.TIPOEQUIPE, TabQuantitativo.DESCMODULO, TabQuantitativo.DESCBLOCO, TabQuantitativo.DESCSERVICO, TabQuantitativo.TIPOSERVICO, TabQuantitativo.UF, TabQuantitativo.VUComDesconto
HAVING (((TabQuantitativo.CODRECURSO)=[Formulários]![FormTabMedicaoServicos]![SubFormTabMedicaoServicos2].[Formulário]![RecursoSubTabExecucao]) AND ((TabQuantitativo.DESCMODULO)<>"pavimentação"))
ORDER BY TabQuantitativo.CODSERVICO;

Fazendo testes com linhas mais simples consegui com a expressão:

Me.Servico.RowSource = "Select...
Mas com os Selects acima não consegui fazer funcionar.

Recorro aos colaboradores do fórum.

Boa noite Leandro,

Já tentou salvar o select em consulta e na Origem Da Linha colocar o nome da consulta?:

Forms!TeuFormulário!TuaCombo.RowSourceType = "Table/Query"
Forms!TeuFormulário!TuaCombo.RowSource = "TuaConsulta"

Nivaldo Aguiar

Boa Nivaldo!

Vou tentar amanhã e logo eu dou retorno.

Obrigado

Nivaldo, funcionou muito bem!

Muito obrigado!