[Resolvido]Preenchimento automático da caixa de seleção após seleção de caixa de combinação

Bom dia

Preciso de uma ajuda, tenho um formulário onde é possível realizar a liberação de acesso aos usuários cadastrados. Hoje é feito de forma manual, mas gostaria de alterar este processo para deixa automático após a seleção do perfil de acesso.

Ex: Se tenho um perfil administrador, todos as caixas de seleção serão flegadas, usuário da sala de coletores apenas liberação do menu coletores e assim por diante.

A seleção deverá ser feita primeiramente na caixa de combinação do usuário e em seguida no perfil de acesso. Lembrando que a caixas de seleção estão em em subformulário

Deixe um print da tela em anexo para facilitar o entendimento.

Amigo, basta apenas colocar uma condição IF ou um Select Case (caso queira fazer o mesmo para Varios Grupos utilize Selec Case).

Onde verificará se o Grupo é Administrador... Se for, ele automaticamente marca as Caixas de Texto especificas...

Ex:


If Me.txtGrupo= "Administrador" Then
Me.NomeSubFormulario!NomeCheckBox= -1
End If


NomeSubFormulario é o Nome do seu Subformulario...
NomeCheckBox é o nome da cx seleção que sera marcada.



Marque todas que quiser...

Fábio bom dia

Obrigado pelo breve retorno, vou tentar aplicar aqui e retorno para validação

Fábio

Infelizmente não consegui aplicar sua orientação, estou deixando o banco em anexo para melhor entendimento do não consegui montar da forma correta

Se puder me ajudar, lembrando que ao selecionar o perfil Administrador deverá selecionar todas as caixas de seleção. Os demais perfis serão acessos aleatórios aos menus.

Obrigado

Trocou um poco as coisas amigo...

Veja:

Private Sub TxtPerfil_AfterUpdate()


If Me.TxtPerfil = "Administrador" Then


Me.SFrm_Permissao!Inclusao_Usuario = -1
Me.SFrm_Permissao!Exclusao_Usuario = -1
Me.SFrm_Permissao!Atender_Chamado = -1
'Liste os Demais Campos no mesmo formato


End If
End Sub

Fábio

Ao abrir o formulário ele esta apresentando a msg em anexo, mas ao fechar ela funciona normalmente

Verifique o Código do evento ao Carregar do seu Formulário... Deve ter algo la incompleto...

Verifique tambem os Codigos de todos os botoes e campos desse formulario...

Fábio bom dia

Consegui achar o erro, tinha uma informação errada ao carregar ao subform

Obrigado pela ajuda, tudo funcionando corretamente agora.

Abraço

Grato pelo retorno! Até a próxima se Deus quiser!

Fábio

Vou abrir um novo tópico, sobre este mesmo formulário. Quando seleciono o usuário não esta incluindo o perfil escolhido no usuário correto.