[Resolvido]Erro ao aplicar filtro em uma caixa de listagem

Boa noite amigos.. Sempre usei este código para aplicar filtro usando uma caixa de listagem. So que hoje ele não quer funcionar e não sei qual e o problema.. Ele da erro em tempo de execução 3075 (operador faltando ) na expressão da consulta.. Não consegui identificar o motivo pois. Obrigado

Código
DoCmd.ApplyFilter , "idEmpresa = " & Me!combo1.Column(0)

Se você está a fazer pelo evento VBA depois de atualizar na combo, tem de dar certo;

Private Sub combo1_AfterUpdate()
   DoCmd.ApplyFilter , "idEmpresa = " & Me!combo1.Column(0)
   Me!idEmpresa.SetFocus
   Me!combo1 = Null
End Sub

Veja mais sobre filtros, no site do Avelino;

http://www.usandoaccess.com.br/tutoriais/tuto35.asp