[Resolvido]Alterar nome de campo proveniente de tabela de referencia cruzada

Boa tarde. Tenho um código que uso para alimentar um relatório proveniente de uma tabela de referencia cruzada. Gostaria de alterar o nome dos campos via código VBA. O código resumidamente é o seguinte:

For I = 0 To 10
Me("txt" & I).ControlSource = .Fields(I).Name
Me("txt" & I).Visible = True
Me("lbl" & I).Visible = True
Me("lbl" & I).Caption = .Fields(I).Name
Next I

O que eu preciso é alterar a última linha do código: Me("lbl" & I).Caption = .Fields(I).Name

Os campos da tabela tem o seguinte padrão: 2011/01 2011/02 (ano/mês). O que gostaria era alterar esses campos para mês/ano. Sendo que não é possível realizar essa alteração diretamente na tabela de referência cruzada. Acreditem que eu já tentei, inclusive foi tema de uma tópico aqui no fórum. Obrigado a todos.

E na estrutura do relatório? Não seria possível?

Então. Os campos do relatório não são acoplados, quem os alimenta é o código que passei a cima. O código acima, na última linha, dá nome aos títulos dos campos. O que eu quero é alterar esses nomes originais para o formato mm/yyyy. Já tentei o format, mas dá erro.

Me("lbl" & I).Caption = .Fields(I).Format (name, "mm/yyyy")

Consegui escrever!

For I = 0 To 10
Me("txt" & I).ControlSource = .Fields(Conta - I).Name
Me("txt" & I).Visible = True
Me("lbl" & I).Visible = True
TituloCampo = .Fields(Conta - I).Name
Me("lbl" & I).Caption = Format(TituloCampo, "mm/yyyy")
Next I

Felicitações a todos!

Certo. Obrigado pelo retorno.