nome do campo na tabela com espaços

"Herdei" um sistema cujas tabelas contem campos com nomes compostos de mais uma palavra : Ex codigo agencia, codigo forma pagto 1 (com espaço entre os nomes)

montei o Select abaixo mas me dá erro "parâmetros insuficientes. Eram esperados 2"

Note que substitui o espaço entre as palavras por _ (underscore)

A aplicação só usava queries e, nesse caso, colocava o nome entre [ ] mas em VBA isso não funciona

Pergunto :

1. O uso do underscore está incorreto ?

2. Como criar um alias (se é que é possivel) na tabela para que possa usa-lo no select ?

strSQL = "Select codigo_agencia,codigo_forma_pagto_1 from srvp"
strSQL = strSQL & " WHERE código_da_empresa_do_servico = '" & Empresa & "'"
strSQL = strSQL & " Order by [codigo_agencia]"
Set rst = dbs.OpenRecordset(strSQL)

poy,

Este é um erro comum a maioria quando inicia comete este tipo de erro.

O uso do _ (underscore) funciona eu nunca tive problemas quanto a isso.


Abraços,