Página 1 de 1
Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 14:12
por rfmfoz
Boa tarde.
A minha planilha contém muitos dados e as vezes quero voltar ao topo dela, então eu iria criar um botão e inserir um hiperlink nele com a mensagem "VOLTAR AO TOPO", porém gostaria que acompanhasse a barra de rolagem.
A parte do botão já consegui fazer, mas gostaria que ele acompanhasse a barra de rolagem.É possível ?
Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 14:41
por FelipeMGarcia
Rfmfoz, toda vez que tiver uma dúvida, fica mais fácil das pessoas ajudarem, se anexar um modelo explicando o que deseja fazer.
Abs
Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 15:15
por rfmfoz
Desculpe, segue o arquivo em anexo para melhor entendimento.
Só rola a barra para baixo para encontrar o que gostaria de fazer.
Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 15:19
por FelipeMGarcia
No seu caso acho que tem que ser via macro, tem um cara muito bom no fórum que se chama @alexandrevba, veja se ele pode te ajudar, eu não manjo de macro.
Abs
Re: Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 16:00
por Kledison
Boa tarde,
verifica se o anexo ajuda, foi usado MACRO.
O botão irá se mover quando você clicar em qualquer célula.
Att
Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 16:23
por rfmfoz
Serve sim!
Como faço para utilizar esse macro em minha planilha oficial ?
Re: Objeto acompanhar barra de rolagem
Enviado: 28 Set 2016 às 16:36
por Kledison
Olá,
abra o VBA e cole a MACRO no módulo de sua planilha que tem o botão (shape).
Você deve colocar o nome do botão dentro da MACRO, no exemplo que postei usei o nome de MENU no botão.
Código: Selecionar todosPrivate Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim lgLIN As Long, shFIG As Object
Set shFIG = ActiveSheet.Shapes("MENU")
With ActiveWindow.VisibleRange
lgLIN = .Row + .Rows.Count - 14
End With
With shFIG
shFIG.Top = shFIG.Top + (lgLIN - .BottomRightCell.Row) * .BottomRightCell.RowHeight
End With
End Sub
Objeto acompanhar barra de rolagem
Enviado: 29 Set 2016 às 08:32
por rfmfoz
Obrigado!