Erro de compilação de campo moeda

Boa noite amigos mais uma vez venho pedir ajuda porque ciei um combo para buscar dados de outra tabela e preencher o formulário e no evento Após atualizar coloquei o seguinte código:
Private Sub Combinação17_AfterUpdate()
With Me.Combinação17
DESCRIÇÃO = .Column(1)
UNID = .Column(2)
Custo unitário = .Column(3)
End With
End Sub

So que  a coluna   Custo unitário = .Column(3)   não quer funcionar   sera  porque é um campo MOEDA? Os dois primeiro(texto) funciona perfeitamente mas quando coloco o campo custo unitário da erro  a seguinte mensagem é exibida :erro de compilação , Sub ou function não definida gostaria de contar com ajuda dos amigos deste Forum

Boa tarde,
Reveja o que contém a coluna 4 da caixa de combinação
O índice começa em zero: índice 0=coluna 1