[Resolvido]Inserção com campos dinamicos

Senhores,

Preciso fazer um update, e com minha pouca experiência, estou encontrando dificuldades.

Preciso que o nome dos meus campos sejam alterados dinamicamente durante o loop tipo abaixo:

Set rs = CurrentDb.OpenRecordset("tblEntregas")

For i = 1 To 20

rs.AddNew

rs!DataSaidaEnt = Date
rs!IDMotoboyEnt = Me!cboMotoboy
rs!IDTipoServ = Me!cboTipoServ01
rs!NumOS = Me!txtOS01
rs!ValorEntregaEnt = Me!cboTipoServ01.Column(2)

rs.Update

Next

Preciso que o numero final do campo seja incrementado tipo: cboTipoServ01, cboTipoServ02, cboTipoServ03
rs!IDTipoServ = Me!cboTipoServ01
rs!IDTipoServ = Me!cboTipoServ02
rs!IDTipoServ = Me!cboTipoServ03

Tentei isso e não está funcionando... Com certeza não é o caminho mais fácil...

rs!IDTipoServ = Me!cboTipoServ0&i

Antecipo agradecimentos =)

Wenceslau

Olá Wenceslau, nao sei se entendi mas tente:
Me("cboTipoServ0"& i)
acho que dará certo

Não deu certo =(

aqui deu certo,
so que os campos ja tenham que estar criados no seu form ou relatorio

tente assim:

Set rs = CurrentDb.OpenRecordset("tblEntregas")

For i = 1 To 20

rs.AddNew

rs!DataSaidaEnt = Date
rs!IDMotoboyEnt = Me.cboMotoboy
rs!IDTipoServ = Me("cboTipoServ0"& i)
rs!NumOS = Me("txtOS0"& i)
rs!ValorEntregaEnt = Me("cboTipoServ0"& i).Column(2)

rs.Update

Next

Bom dia Cleber,

Funcionou perfeitamente, eu realmente estava com um campo com um espaço a mais, por isso ele dava o erro.

Muitíssimo obrigado, funcionou perfeitamente.

Abraços,

Wenceslau   

voce tinha colocado Me!cboMotoboy e o certo era Me.cboMotoboy