[Resolvido]Alterar caminho numa função VBA ?

Boa tarde

Tenho esta frase numa função
Set db = OpenDatabase("C:\Agenda.accdb")
__________________________________________________

Queria substituir por
Set db = OpenDatabase("Caminho")

Sendo que Caminho é um campo texto que me devolve exatamente, sem aspas  "C:\Agenda.accdb", e não reconhece  CAMINHO

Já fiz:
Dim caminho as string, e nada

Dá erro no Caminho

Já tentou sem as aspas no ("Caminho")? Nomes de variáveis não contem aspas.

Obrigado
Criquio

Agradecemos pelo retorno grande Assis.