Este fórum está sendo desativado

[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 ?

[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

[rfmfoz]

Desculpe, segue o arquivo em anexo para melhor entendimento.

Só rola a barra para baixo para encontrar o que gostaria de fazer.

[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

[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

[rfmfoz]

Serve sim!

Como faço para utilizar esse macro em minha planilha oficial ?

[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 todos

Private 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

[rfmfoz]

Obrigado!