[Resolvido]DAO.RecordSet trazendo valor nulo

Olá pessoal do MáximoAccess,
   Estou com o seguinte problema:

Código:

Dim grp As Integer
Dim db as DAO.Database
Dim TBRelatorio as DAO.Recordset
Dim contaddor as Integer
Set db = CurrentDb

Set TBRelatorio = db.OpenRecordset("SELECT Consulta1.GRUPO FROM Consulta1 ORDER BY Consulta1.GRUPO", dbOpenDynaset)

TBRelatorio.MoveLast
TBRelatorio.MoveFirst

While contaddor < TBRelatorio.RecordCount
grp = TBRelatorio("GRUPO")
TBRelatorio.MoveNext
contaddor = contaddor + 1
Wend

Onde Consulta1 é uma consulta criada no modo consulta do access e GRUPO é um campo (do tipo inteiro) dessa consulta.

Tratava exatamente assim para pegar o valor de um campo do tipo String, e conseguia atribui-lo na variavel, agora preciso pegar desse campo Integer e nao dá certo, não sei porque. Acusa o seguinte erro: "Erro em tempo de execução '94': Uso de 'Null' inválido."

PS: Tenho certeza, não há nenhum registro que esteja sem preenchimento (ou seja, nulo) na Consulta1.

Não estaria faltando inicializar a variável db?

Opa, desculpa a ignorância Cláudio, eu editei algumas partes do código pra postar aqui, e acabei esquecendo de inicializa-la, mas no projeto real está inicializada sim. Já vou editar o post e arrumar, obrigado a observação.

Então, não há nada errado com o código, deve ser mesmo caso de algum registro com o campo GRUPO nulo.

É, pensei o mesmo, por isso passei o Recordset de uma tabela para essa consulta, onde nego registros nulos no campo GRUPO... Não tem falha nisso e posso afirmar Cláudio... Também achei muito estranho, porque aparentemente está certo... Quando eu mudo a variável "grp" pro tipo String, e procuro informação de MUNICIPIO que é um outro campo dessa consulta, funciona perfeitamente... Achei que o problema fosse com o tipo Integer de dados... Mas é só um palpite...

Certamente, a variável grp deve ser do mesmo tipo de dados do campo GRUPO.

Além disso, tente a seguinte alteração no recordset:

SELECT GRUPO FROM Consulta1 WHERE GRUPO Is Not Null ORDER BY GRUPO

Obrigado pela ajuda Cláudio, e desculpe a demora do retorno. Resolvi o problema, porém como nem eu entendi rsrs...
Refiz a consulta na tabela, e criei outra variável do tipo Integer que chamei de group. Só rsrs, funcionou... Mistério kk enfim, obrigado pela ajuda.

rs...  
de nada