[Resolvido]Alterar Origem de linha de uma cx combinação usando VBA

Olá Pessoal!

No meu form tenho uma cx combinação ("cboCriterio") e uma cx Seleção ("selOpçao).

Gostaria que ao marcar a "selOpçao" a "cboCriterio" tivesse a propriedade Origem de Linha modificada.

Quando "selOpçao" for = true, deve mostrar os campos "idCongregação" e "nomeCongregação" data tabela Congregação que existe no meu projeto.
Quando "selOpçao" for = false, deve mostrar os campos "idMes" e "nomeMes" data tabela Mese que existe no meu projeto.

agradecido,

Ronaldo Costa

Olá Ronaldo
Para o que pretende utilizamos o RowSource, veja código abaixo:

Código:

Private Sub Form_Open(Cancel As Integer)
    Call selOpçao_Click
End Sub

Private Sub selOpçao_Click()
    If Me.selOpçao = True Then
        Me.cboCriterio.RowSource = "SELECT Congregação.idCongregação, Congregação.nomeCongregação FROM Congregação;"
    Else
        Me.cboCriterio.RowSource = "SELECT Meses.idMes, Meses.nomeMes FROM Meses;"
    End If

End Sub


cxVerificacao_cxCombinacao.rar

Abraço

Obrigado, meu caro. Me ajudou muito.

Obrigado pelo retorno.
Abraço