Pessoa, boa noite

 

estou com o seguinte prolblema....

 

Utilizo o offce 2000 e não cosigo utilizar o método .AddItem do objeto 'Lista' Mesmo após criar um banco de dados em branco o erro continua o mesmo.

 

Erro: 438# O objeto não aceita essa propriedade ou método.

 

código:

 

Sub grupo_adicionar_lista()

Dim lista As Control

acesso = Forms!grupo!grupo.Column(1)

Forms!grupo!lista.AddItem acesso

End Sub

 

Obs.: Isso acontece somente no access, no excel funciona normalmente.

 

Se alguém puder me ajudar desde já agradeço e desejo um feliz natal à todos.