[Resolvido]Marcar Varias Caixa de Combinação por VBA

Boa Noite a Todos !

tenho uma Caixa de Combinação com Diversas Opções.

Ex:

[] - NF-e de Entrada
[] - NF-e de Saída
[] - CT-e de Entrada
[] - CT-e de Saída
etc ...

Como tenho um nome com mais de 5.000 caixinhas pra marcar gostaria de saber se tem como eu colocar dentro de um loop.

um código mais ou menos assim

DoCmd.GoToRecord , "", acFirst 'vai para o primeiro registro
Dim tot_registro As String
tot_registro = DCount("[cod empresa]", "tb_empresa") 'Contar o total de registro para o loop

for i = 1 To tot_registro Step 1 ' começa o loop
if me.Obrigações = "NF-e de Entrada" then

aqui que não sei como marcar a caixinha que contem o nome "NF-e de Entrada"


end if



DoCmd.GoToRecord , , acNext
Next

consegui aqui depois mais de 5 horas era bem simples

Me.Obrigações.Selected(2) = True é isso que faltava