MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Caixa de combinação -> Selecionar página em guia

    avatar
    filipebrg
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/12/2018

    [Resolvido]Caixa de combinação -> Selecionar página em guia Empty [Resolvido]Caixa de combinação -> Selecionar página em guia

    Mensagem  filipebrg em 18/12/2018, 18:18

    Amigos, boa tarde !

    É uma grande satisfação poder trocar ideias com vocês, com alguns dos quais já tive a honra de aprender um pouco mais de Access pelo YouTube.

    Minha dúvida é a seguinte (já procurei em diversos tópicos do fórum e não encontrei):

    - Tenho uma caixa de combinação (Cbo_Forma de Pgto), com dados oriundos de uma tabela (5_1 Formas de Pagamento), em um formulário (4_1 Nova inscrição);

    - Após selecionar uma determinada linha na Cbo_Forma de Pgto, gostaria que fosse aberta a página correspondente em um Controle Guia (Guia_FormadePgto);

    - A tabela "5_1 Formas de Pagamento" está assim construída:

    Formas de Pagamento
    Boleto Bancário
    Cartão de Crédito
    Cartão de Débito
    Transferência Bancária - DOC
    Transferência Bancária - TED
    Pagamento Presencial
    Link (PagSeguro)

    - A numeração dos índices (páginas) do controle guia está na mesma sequência (0 - Boleto Bancário; 1 - Cartão de Crédito; etc)

    Como procedo com a construção do código ???

    Desde já agradeço !!

    filipebrg
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1086
    Registrado : 22/11/2016

    [Resolvido]Caixa de combinação -> Selecionar página em guia Empty Re: [Resolvido]Caixa de combinação -> Selecionar página em guia

    Mensagem  IvanJr. em 18/12/2018, 20:55

    Mande o foco para a página com o setfocus

    Código:
    Private Sub Cbo_Forma_de_Pgto_AfterUpdate()

        if nz(me.activecontrol.value)="" then exit sub

        select case me.activecontrol.value

              case "Boleto Bancário"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus
              case "Cartão de Crédito"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus
              case "Cartão de Débito"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus
              case "Transferência Bancária - DOC"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus
              case "Transferência Bancária - TED"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus
              case "Pagamento Presencial"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus
              case "Link (PagSeguro)"
                  me("NomeDaGuiaEncontradoNaFolhaDePropriedadesGuiaOutraPropriedadeNome").setfocus

        end select
    End Sub


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    filipebrg
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/12/2018

    [Resolvido]Caixa de combinação -> Selecionar página em guia Empty Show !!!

    Mensagem  filipebrg em 18/12/2018, 23:28

    Grande IvanJr. !

    Muitíssimo obrigado !

    Fiz as mudanças necessárias e funcionou 100% !!!

    Valeu ! Tmj !!
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1086
    Registrado : 22/11/2016

    [Resolvido]Caixa de combinação -> Selecionar página em guia Empty Re: [Resolvido]Caixa de combinação -> Selecionar página em guia

    Mensagem  IvanJr. em 19/12/2018, 00:58

    Obrigado pelo retorno. O fórum agradece. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado

    [Resolvido]Caixa de combinação -> Selecionar página em guia Empty Re: [Resolvido]Caixa de combinação -> Selecionar página em guia

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 15/12/2019, 18:29