Página 1 de 1

Botão voltar ao topo.

Enviado: 16 Ago 2016 às 12:47
por CleuberZago
Boa tarde, pessoal!

Acham possível desenvolver uma rotina vinculada à um formulário que simule o botão de "Voltar ao topo" que vemos em sites, por exemplo? Esse formulário deveria ficar fixo na parte de baixo da planilha e acompanhar o deslocamento da página, caso desca a tela, ele tem que permanecer no mesmo local, de forma que possa navegar livremente pela minha pasta de trabalho...

Desde já, grato pessoal...

Re: BOTÃO VOLTAR AO TOPO

Enviado: 16 Ago 2016 às 13:26
por alexandrevba

BOTÃO VOLTAR AO TOPO

Enviado: 16 Ago 2016 às 14:15
por CleuberZago
Oi, Alexandre, obrigado pelo retorno...

Então, talvez não tenha sido claro na minha duvida... Mas a mesma não é sobre o hiperlink, quanto à isso tudo ok.
A dúvida é sobre deixar esse objeto "flutuando" na planilha, deixando livre a minha rolagem... Independente de onde estivesse na planilha, a imagem continuaria na parte de baixo da planilha, quando quisesse retornar para o topo da página, ai sim usaria o hiperlink...

Botão voltar ao topo.

Enviado: 16 Ago 2016 às 16:07
por FelipeAguiar
Boa tarde amigo,
Basta você congelar a linha aonde está o objeto / shape , então ele sempre será visível independente da rolagem.

CAMINHO NOS MENUS:
(EXIBIÇÃO > CONGELAR PAINÉIS > CONGELAR LINHA SUPERIOR)

Segue anexo com exemplo.

Botão voltar ao topo.

Enviado: 16 Ago 2016 às 17:09
por CleuberZago
Opa, valeu Felipe... Mas também não é isso... kkkk

O que acontece é que já tenho painéis congelados na parte superior da planilha, o "cabeçalho" da planilha... O que preciso é que tenha um botão na parte de baixo da planilha que acompanhe minha navegação pela pasta de trabalho e que quando quiser ir à parte superior da mesma não precise usar o Ctrl+home, por exemplo. É só clicar no botão que estará na parte de baixo...

Botão voltar ao topo.

Enviado: 19 Ago 2016 às 23:16
por CleuberZago
E ai pessoal, alguem tem uma ideia de como devo proceder?

EDIT: Consegui uma rotina aqui, mas gostaria de adaptar algumas coisas...

Ela faz exatamente o que preciso, porém só duas coisas queria adaptar: 1- Ela percorre apenas quando clico na célula, se por exemplo eu descer usando o scroll do mouse, ela já não acompanha, só se selecionar a célula. É possível configura-la à tela?
2- A imagem só acompanha quando desloco pra baixo, se for para a direita ou esquerda, a imagem não acompanha. Também é possível ajustar?

Abaixo segue o código...
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 - 1
    End With
        With shFIG
        shFIG.Top = shFIG.Top + (lgLIN - .BottomRightCell.Row) * .BottomRightCell.RowHeight
    End With
End Sub

Re: Botão voltar ao topo.

Enviado: 22 Ago 2016 às 12:51
por alexandrevba
Boa tarde!!

Veja se ajuda:
http://sitestory.dk/excel_vba/popup-menu-eng.htm

No caso do post, após fazer sua aptação, apenas click com o botão direito do mouse em qualquer célula e terá seu popup disposto la tela.
Leia também:
http://www.lazerwire.com/2011/11/excel- ... ns-to.html

Att

Botão voltar ao topo.

Enviado: 23 Ago 2016 às 08:33
por CleuberZago
Opa, perfeito Alexandre!

Vlw pela ajuda...