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


3 participantes

    [Resolvido]Caixa de Combinação Abre Formulário

    avatar
    lulenunes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 05/06/2015

    [Resolvido]Caixa de Combinação Abre Formulário Empty [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  lulenunes 14/2/2016, 01:15

    Caros amigos, boa noite.

    Gostaria de saber se podem me ajudar na seguinte dúvida (se for possível):

    Em meu formulário de cadastro de funcionários possuo uma caixa de combinação com as seguintes opções: Ativo, Férias, Afastado e Desligado, também possuo um formulário que contém informações sobre desligamento(CadDesl) quando o funcionário sai da empresa. Gostaria que quando o usuário selecionasse a opção desligado, abrisse automaticamente o formulário CadDesl para cadastrar todas as informações de desligamento daquele funcionário.

    Sei que com subformulário seria bem fácil,  porém, o "controle guia" que possuo no formulário de cadastro já está bem cheio, devido a isto, estou tentando este formulário pop up.

    grato a todos.


    Última edição por lulenunes em 14/2/2016, 01:16, editado 1 vez(es) (Motivo da edição : correção de texto)
    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  formiga10x 14/2/2016, 01:22

    No evento "Após atualizar" digite...

    DoCmd.OpenForm "NomeDoForm"


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    avatar
    lulenunes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 05/06/2015

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  lulenunes 14/2/2016, 13:40

    Caro Formiga, bom dia.

    Grato pelo retorno, porém, com este código ele abre o formulário com qualquer uma das opções, necessito que ele abra somente quando selecionar desligado.
    Existe mais algum complemente no código que necessito inserir?

    grato
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  Nogaro513 14/2/2016, 14:19

    boa tarde amigo Luiz, fiz um simples exemplo cx Comb Desligado abre formulário.
    abraço Nogaro !
    Anexos
    [Resolvido]Caixa de Combinação Abre Formulário AttachmentExemplo.Nogaro_Desligado.Abre_Form.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (22 Kb) Baixado 13 vez(es)
    avatar
    lulenunes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 05/06/2015

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  lulenunes 15/2/2016, 23:27

    Caro amigo Nogaro, boa noite.

    Muito obrigado funcionou perfeitamente, porém, não querendo abusar, necessito de mais uma informação. Necessito que ele abra o formulario de desligado vinculado ao registro que está aberto na tela, ex.: tenho o cadastro de funcionários aberto com o funcionário sob registro nº 52, esse funcionário está sendo desligado, ao selecionar a opção desligado em minha caixa de combinação ele abra o formulario de desligamento deste registro.

    Objetivo da ação:
    Cadastrar os dados de desligamento deste colaborador
    Poder consultar o motivo de desligamento quando necessário (referências, readmissão, etc.)
    Gerar relatórios de demitidos de determinado período
    Gerar relatórios de turn-over

    Espero ter explicado com clareza.

    Mais uma vez, muito obrigado, pois me servirá também para outros fins.
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  Nogaro513 15/2/2016, 23:43

    boa noite amigo Luiz, fiz um  exemplo cx Comb Desligado abre formulário no mesmo Cadastro .
    aguardo retorno !

    .
    abraço Nogaro !
    Anexos
    [Resolvido]Caixa de Combinação Abre Formulário AttachmentExemplo.Nogaro_Desligado.Abre_Form.no.Nome.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (23 Kb) Baixado 16 vez(es)
    avatar
    lulenunes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 05/06/2015

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  lulenunes 20/2/2016, 13:44

    Caro Nogaro, bom dia.

    O seu funciona perfeitamente, porém, notei que a base dos dados é de uma única tabela, não sei se isso pode interferir no meu problema, enquanto o meu é composto de duas tabelas.

    Fiz os códigos exatamente igual ao seu (trocando os campos lógico..rs), porém, quando seleciono desligado ele abre a caixa de mensagem dizendo que o parâmetro "txt_Codigo" não foi encontrado. Irei anexar um arquivo modelo, para caso você tenha tempo, possa verificar meu erro.

    agradeço muito pela atenção.
    Anexos
    [Resolvido]Caixa de Combinação Abre Formulário AttachmentLuizTeste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (75 Kb) Baixado 9 vez(es)


    Última edição por lulenunes em 20/2/2016, 14:11, editado 1 vez(es) (Motivo da edição : Arquivo anexo errado)
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  Nogaro513 20/2/2016, 16:09

    boa tarde amigo Luiz, monte seus Dados em apenas uma Tabela ai funciona Perfeitamente pelo que vi não Precisa de dua tabelas!
    avatar
    lulenunes
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 05/06/2015

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  lulenunes 20/2/2016, 17:20

    Caro amigo Nogaro, boa tarde.

    Infelizmente não tem como, pois é um sistema de gerenciamento de RH e já estou utilizando, ou seja, são mais de 10 tabelas e a de cadastro de funcionários já é enorme, sem contar as diversas consultas, formulários e relatórios e contém mais de 200 registros de funcionários e mais 1500 treinamentos cadastrados, ou seja, tudo com base em tabelas separadas.

    Mas a boa notícia é que acabei de conseguir da seguinte forma:

    - Nas propriedades caixa de combinação selecionei o evento “após atualizar”
    - Abri o editor VBA e inseri o seguinte código:
    - If CxCombo_Situacao = “Desligado” Then
     DoCmd.OpenForm “FM_Desligamento”
     End IF (Instrução que você me passou)

    - Abri o formulário que será aberto no modo estrutura
    - No evento ao carregar do formulário, abri o editor VBA e inseri o seguinte código
    - Me.Cod_Func = Forms!FM_CadFunc.Código

    Funcionou perfeitamente e também serve para abrir através de botão, lógico que tirando a instrução IF

    Muito obrigado pela sua ajuda, a qua, foi muito importante.
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  Nogaro513 20/2/2016, 21:23

    boa noite amigo Luiz, que bom que resolveu,

    o Forum agradece o Retorno!


    abraço Nogaro.

    Conteúdo patrocinado


    [Resolvido]Caixa de Combinação Abre Formulário Empty Re: [Resolvido]Caixa de Combinação Abre Formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 10/5/2024, 04:31