[Resolvido]Caixa de combinação seleciona coluna de tabela

Boa tarde mestres, venho novamente à vossa presença com o seguinte problema: tenho um formulário denominado formulário1, onde nele visualizo o total de associados, quantos liquidaram, quantos faltam liquidar (esta é fácil) e o total cobrado. Ora, o que necessitava era que através de uma caixa de combinação selecionasse o ano pretendido e nas caixas de texto visualiza-se os elementos de cada ano, estes elementos de cada ano estão na tabela associados, porque da forma que tenho implementado só visualiza o ano corrente. Pedia a vossa preciosa ajuda e disponibilidade. Obrigado.
Abraço,
Rui Maciel
Envio a base de dados completa em anexo.

Rui, não pude ver a BD pois meu access é versão 2000, mas posso tentar ajudar.

No evento Após Atualizar da combo, coloque o seguinte comando:

Me!SeuCampo = Me!SuaCombo.Column(Nº da coluna que você quer)

Para isso funcionar, você tem que inserir na origem da linha da combo os campos que você precisa e definir nas propriedades da combo o número de colunas e suas larguras.

Para colunas que você não precisa ver na combo, deixe como largura = zero ► Mesmo que não forem vizualizadas as colunas tem que ter a largura definida

abraço

Viva Leandro segue em access 2000
Abraço,
Rui

Boa tarde
E se fizer o solicitado através de uma consulta? Será que resulta?
Abraço,
Rui

Rui, só puder ver agora, mas a combo não está mostrando os anos, de onde vem esses anos?
Dá pra fazer por consulta sim, mas aí terá que buscar as infos por função de domínio e não acho que será proveitoso, me explique como são as infos que quer mostrar e vamos pensando numa maneira de fazê-lo.

Abraço

Viva Leandro.
Então vamos lá se consigo fazer-me entender.
O que pretendo é que no formulário1 com quatro caixas de texto, onde na primeira estão o total de associados (esta sei implementar), na segunda os associados que faltam liquidar as suas quotas para esse ano (esta também não é difícil basta subtrair a primeira à terceira, e na terceira os que já liquidaram para esse ano e na quarta o total arrecadado nesse ano, ora nestas é que estão as dificuldades, pois, pretendo que na terceira vá contar os registos na coluna do ano pretendido e na quarta o total arrecadado nesse ano. A tabela com as informações pretendidas para as caixas de texto é a associados. Os anos para aparecerem na caixa de combinação estão na tabela anoscivis. Espero que me tenha feito entender o que pretendo. desde já agradecendo a atenção dispensada.
Abraço, Leandro e boas Páscoas para ti e para os teus.
Rui

Boa tarde
Tentei utilizar a seguinte função mas não dá, pois, conta sempre os registos todos e não seleciona a coluna pretendida.

Public Function ContaRegisto(strTabela As String) As Integer
Dim RS As DAO.Recordset
Set RS = CurrentDb.OpenRecordset(strTabela)
If Not RS.EOF Then
ContaRegisto = RS.RecordCount
Else
ContaRegisto = 0
End If
Set RS = Nothing
End Function

e no depois de atualizar da caixa de combinação o seguinte:
Private Sub cbxSelecionar_AfterUpdate()
If Me.cbxSelecionar.Value = "2013" Then
Me.Texto4 = ContaRegisto("Associados")
End If
End Sub

Abraço,
Rui Maciel

Boa noite Leandro
Depois de estudar e matutar consegui resolver com o seguinte procedimento:

Private Sub cbxSelecionar_AfterUpdate()
If Me.cbxSelecionar.Value = "2013" Then
Me.Texto4 = DCount("[a2013]", "Associados")
Me.Texto4.Requery
Me.Texto6 = Nz(DSum("[a2013]", "Associados"), 0)
End If
If Me.cbxSelecionar.Value = "2014" Then
Me.Texto4 = DCount("[a2014]", "Associados")
Me.Texto4.Requery
Me.Texto6 = Nz(DSum("[a2014]", "Associados"), 0)
End If
End Sub

Fazendo para todos os anos.
Obrigado Leandro pela atenção, estudando consegue-se quase tudo,
Abraço, boas Páscoas,
Rui Maciel