MaximoAccess

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

Obrigado

Administração do MaximoAccess

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]Criar Cx de texto com o valor da guia que está ativa.

    avatar
    Anderson Tropiani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 03/08/2020

    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Empty [Resolvido]Criar Cx de texto com o valor da guia que está ativa.

    Mensagem  Anderson Tropiani em 23/8/2020, 23:46

    Olá pessoal boa tarde,
    Tenho um Formulário (frm_Caixa), nesse formulário tenho um Controle Guia com 2 páginas (Uma se chama "Receita" e a outra "Despesas"). Preciso colocar uma Caixa de Texto em meu Formulário, essa caixa deve ter o valor igual ao nome da Guia que está ativa.
    Ex. Se eu estiver com a guia Receita sendo exibida em minha tela a caixa de texto deve ter o valor "Receita", ao clicar e passar para a guia Despesas a caixa de texto deve alterar para o valor "Despesas".

    Alguém pode me ajudar a fazer isso funcionar? Obrigado
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Empty Re: [Resolvido]Criar Cx de texto com o valor da guia que está ativa.

    Mensagem  crysostomo em 24/8/2020, 15:48

    Bom dia irmão.
    Tentei fazer um controle mais rasurável com menos linha mas não deu. da uma olhada para ve se esse te ajuda
    a tag fica no evento> marca
    abç
    Anexos
    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Attachmentcontrole de gui com if.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (20 Kb) Baixado 3 vez(es)


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    Anderson Tropiani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 03/08/2020

    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Empty Re: [Resolvido]Criar Cx de texto com o valor da guia que está ativa.

    Mensagem  Anderson Tropiani em 24/8/2020, 16:06

    Bom dia crysostomo, valeu por responder irmão
    abri aqui e não funcionou nem mesmo do exemplo que enviou.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Empty Re: [Resolvido]Criar Cx de texto com o valor da guia que está ativa.

    Mensagem  crysostomo em 24/8/2020, 16:49

    ao clicar na aba depois você clica dentro da caixa guia que vai aparecer
    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Sem_tz75


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    Anderson Tropiani
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 03/08/2020

    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Empty Re: [Resolvido]Criar Cx de texto com o valor da guia que está ativa.

    Mensagem  Anderson Tropiani em 25/8/2020, 20:48

    Boa tarde crysostomo, sua idéia foi legal mas estava procurando algo automatizado, sem precisar clicar dentro das guias como no seu exemplo, agradeço pelo tempo e pelo retorno.
    Consegui resolver colocando um If direto no Controle de Guias, no evento ao clicar coloquei o seguinte comando:

    Private Sub CtlGuia6_Click()
    If Me.CtlGuia6 = 0 Then
    Me.txtguiaativa = "Receita"
    Else
    Me.txtguiaativa = "Despesas"
    End If
    End Sub

    Ai funcionou certinho.
    Mais uma vez agradeço pela ajuda. Abraços.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Criar Cx de texto com o valor da guia que está ativa. Empty Re: [Resolvido]Criar Cx de texto com o valor da guia que está ativa.

    Mensagem  crysostomo em 25/8/2020, 22:41

    no meu esse código não estava dando certo aqui. O bom que te ajudou .
    Vlw


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 28/9/2020, 08:55