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

    [Resolvido]Manipular ScrollBars em Subform pelo VBA

    lupe
    lupe
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 458
    Registrado : 15/07/2010

    [Resolvido]Manipular ScrollBars em Subform pelo VBA Empty [Resolvido]Manipular ScrollBars em Subform pelo VBA

    Mensagem  lupe 22/9/2018, 13:31

    Olá!

    Gostaria de saber se é possível manipular as Barras de Rolagem do Sub Formulário através do VBA.

    Tornar a barra oculta ao abrir o formulário e reexibir ao mover do mouse;

    Alterar a largura da barra (Mais fina ao abrir o formulário e voltar ao tamanho padrão ao mover o mouse);

    Alterar a cor da barra.

    Trabalho com Access 2010 e 2013, Windows 8 e 10.

    Desde já, obrigado!


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.
    caiosouza
    caiosouza
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 419
    Registrado : 05/12/2016

    [Resolvido]Manipular ScrollBars em Subform pelo VBA Empty Re: [Resolvido]Manipular ScrollBars em Subform pelo VBA

    Mensagem  caiosouza 2/12/2018, 16:23

    Boa tarde,

    Para alterar nos SubForms:

    Código:
    Sub AlterarBarra(Tipo As Integer)
    '0 = Sem barra de rolagem
    '1 = somente horizontal
    '2 = somente vertical
    '3 = horizonta e vertical
        Me.Forms!SeuSubForm.ScrollBars = Tipo
    End Sub

    Já para alterar a largura e cor acredito que não é possível.


    .................................................................................
    Caio Souza

    Engenheiro de Software
    lupe
    lupe
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 458
    Registrado : 15/07/2010

    [Resolvido]Manipular ScrollBars em Subform pelo VBA Empty Re: [Resolvido]Manipular ScrollBars em Subform pelo VBA

    Mensagem  lupe 3/12/2018, 19:45

    Olá, caio!

    Obrigado!


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.
    caiosouza
    caiosouza
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 419
    Registrado : 05/12/2016

    [Resolvido]Manipular ScrollBars em Subform pelo VBA Empty Re: [Resolvido]Manipular ScrollBars em Subform pelo VBA

    Mensagem  caiosouza 4/12/2018, 09:34

    Bom dia!

    Agradeço o retorno, bons estudos... cheers


    .................................................................................
    Caio Souza

    Engenheiro de Software

      Data/hora atual: 25/7/2021, 04:41