MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

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

    avatar
    alexjc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 23/02/2016

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

    Mensagem  alexjc 18/3/2022, 22:15

    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
    avatar
    alexjc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 23/02/2016

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

    Mensagem  alexjc 19/3/2022, 00:48

    consegui aqui depois mais de 5 horas era bem simples

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

      Data/hora atual: 25/9/2022, 14:34