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


2 participantes

    [Resolvido]Ativar subformulário ao clicar em um campo

    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Ativar subformulário ao clicar em um campo

    Mensagem  FABIOSIAMES 24/1/2012, 18:24

    Pessoal tem como eu deixar o meu subformulário inativo no meu formulário e só ativa-lo quando eu clicar em um campo.
    Não mexo muito bem, ele já esta com entrada como sim.

    Agradeço pela ajuda.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  Marcelo David 24/1/2012, 18:50

    No evento ao carregar do form principal:

    Me.SeuSubForm.Enabled = False 'Inicia o form principal com o subform desabilitado

    Agora no evento após atualizar do campo:

    If Not IsNull(Me.SeuCampo) Then 'Verifico se o campo está preenchido, se estiver, habilito então...
    Me.SeuSubForm.Enabled = True 'Habilito o subform
    End If

    Troque o que estiver em vermelho pelos nomes dos seus controles


    .................................................................................
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ativar subformulário ao clicar em um campo Marcel11
    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  FABIOSIAMES 26/1/2012, 12:49

    Pessoal até desativar o subformulario deu certo.

    Porém quando clico nele para ativa-lo e ai sim preencher o campo ele não deixa.

    Teria uma outra opção de ao clicar no campo ele ative o subformulário para preenchimento e salvar

    Obrigado.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  Marcelo David 26/1/2012, 12:59

    Amigo Fábio, veja se o nome do subform está correto, pois esse método acredito ser um dos mais simples e me tem funcionado...
    Caso não consiga, poste seu banco aqui eu faço para você!


    .................................................................................
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ativar subformulário ao clicar em um campo Marcel11
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  Marcelo David 26/1/2012, 13:15

    Mas tente assim:

    No evento ao carregar do form principal:

    Me.SeuSubForm.Enabled = False 'Inicia o form principal com o subform desabilitado

    Agora no evento ao perder o foco:

    If Not IsNull(Me.SeuCampo) Then 'Verifico se o campo está preenchido, se estiver, habilito então...
    Me.SeuSubForm.Enabled = True 'Habilito o subform
    End If

    Troque o que estiver em vermelho pelos nomes dos seus controles


    .................................................................................
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ativar subformulário ao clicar em um campo Marcel11
    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  FABIOSIAMES 26/1/2012, 13:39

    Então meu problema esta sendo pq ele abre desativado como modo de inclusão com os campo em branco e não consigo digitar neles para ele ativar.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  Marcelo David 26/1/2012, 14:02

    ´Mas não é isso que vc quer?
    Iniciar desabilitado?
    O campo que você que que ao entrar habilite o subform está no forme principal, ou é no próprio subformulário?

    Uma outra alternativa seria criar um botão, para quando clica-lo, habilite o subfor.
    Ficaria mais ou menos assim:

    Evento ao clicar do botão:

    Me.SeuSubForm.Enabled = True
    MsgBox "Modo edição habilitado", vbInformation, "Aviso"

    Teste aí e veja, não esqueça de trocar o que estiver em vermelho pelo seu controle.


    .................................................................................
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ativar subformulário ao clicar em um campo Marcel11
    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  FABIOSIAMES 26/1/2012, 14:20

    Cara deu certo.

    Obrigado mesmo pela ajuda.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  Marcelo David 26/1/2012, 14:41

    O fórum agradece o retorno!


    .................................................................................
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ativar subformulário ao clicar em um campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ativar subformulário ao clicar em um campo Marcel11

    Conteúdo patrocinado


    [Resolvido]Ativar subformulário ao clicar em um campo Empty Re: [Resolvido]Ativar subformulário ao clicar em um campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 23:20