[Resolvido]Executar Função com uma determinada condição

Boa Tarde!

Procurei aqui no forum algo que pudesse em ajudar, mas não encontrei por isso peço a ajuda de todos.
Preciso executar uma função mas somente se um determinado campo tiver o valor correto:
o código e o esse:
Private Sub BtCalc_Click()

If Me.[Selecionar Condicao].Column(2) = Me.Parc Then
Call calcula
End If
End Sub
O problema e´que nao executa a função de maneira alguma.
O campo "Parc" recebe a quantidade de registros da lisbox.
ele tem como fonte de registro:
=[NumReg]

O Campo NUmReg recebe o numeros de registros da ListBox
Me.NumReg = ListaParcelas.ListCount
que por sua vez passa para o Campo Parc
E ai vem o prblema:
Mesmo o Campo Parc tendo o memso valor do campo [Selecionar Condicao].Column(2)
a funçaõ nao e executa
onde estou errando?
Afinal se o numero de parcelas for 5 campo" [Selecionar Condicao].Column(2)'" e o campo Parc tambem for do mesmo valor a funçao teria de ser executada.

End Sub

Boa noite,

Para poder ajudar, posta aqui seu BD.

Abraço...

Bom dia!
Não consigo enviar apesar de o arquivo estar com 427 kb da emsnagem que nao tem espaço suficinte..
porque da essa emnsagem?

Não é possível enviar o arquivo : o espaço total de armazenamento foi ultrapassado. (Espaço restante : 31 Kb)
Esasa e a mensagem que aparece quando tento enviar o arquivo

Poste no dropbox ou outro serviço de hospedagem externo e envie o link.

nao sei fazer isso não

informo que com a excepcional ajuda do mestre Roberto Cardoso
do qual me ajudou muito muito mesmo.
O problema foi resolvido ja estava quase a desistir.

Meu muito obrigado.

Estamos aqui para isso, ajudar e ser ajudado.

Abraço.....