Notifications

Clear all

Ajuda com barra de rolagem

2024 - VBA & Macros

Post Recente por ragnobo 12 anos atrás

6 Posts

3 Usuários

0 Reactions

2,034 Visualizações

RSS

ragnobo

(@ragnobo)

Posts: 42

Eminent Member

Topic starter

Olá

Venho pedir ajuda na seguinte questão.

Gostaria que a barra de rolagem horizontal e vertical so mostrassem do A1 ao T34, que não fosse possivel passar disso.

Tentei assim.
Private Sub Workbook_Open()
Worksheets("ONomeDaPlanilha").ScrollArea = "A1:T33"
End Sub

mais não funcionou alguem poderia me dar umas luz uso excel 2010.

Fui util ? Ajudei ?

Não esqueça de agradeçer Resolveu a duvida marque o topico como resolvido. :mrgreen:

Postado : 05/03/2013 8:36 am

Wagner Morel

(@wagner-morel-vidal-nobre)

Posts: 0

Illustrious Member

ragnobo,

Boa Tarde!

Não entendi porque não está funcionando aí com você. Utilizo Excel 2007, testei aqui e funcionou normalmente. Veja no arquivo anexo, com o mesmo código que você enviou. Não fiz nada.

Delimitação de Área.zip

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

Postado : 05/03/2013 9:23 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Para funcionar a macro deve ser colocada em EstaPasta_de_Trabalho.

Doni

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 05/03/2013 11:05 am

ragnobo

(@ragnobo)

Posts: 42

Eminent Member

Topic starter

Sim ja coloquei a macro na pasta de trabalho ai e que está utilizo o excel 2010 e não está funcionando aqui.

Teria outra solução ou um codigo diferente com a mesma função pra ver se funciona?

OBS: Acho que vou ter de fazer diferente. tenho 6 abas e cada uma tenho de denominar o tamanho da rolagem diferente.

No caso alguma ideia de 1 macro para cada aba.

Fui util ? Ajudei ?

Não esqueça de agradeçer Resolveu a duvida marque o topico como resolvido. :mrgreen:

Postado : 05/03/2013 12:34 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Estranho, pois como o Wagner Morel disse está funcionando.

Agora se quiser tentar outro método ai vai:

Click com botão direito do mouse sobre a guia nome da planilha (aba), que vc deseja restringir a rolagem e selecione Exibir Código. Digite "F4" e na Propriedade da planilha Click na caixa ScrollArea e digite a área a ser delimitada, exemplo: A1:K50, digite enter.
Click na área de projeto VBA da mesma planilha que vc deseja restringir e digite o código abaixo:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.ScrollArea = "A1:J30"
End Sub

Salve a planilha.
Obs. vc pode fazer isso para cada planilha que desejar.

Doni

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 05/03/2013 7:19 pm

ragnobo

(@ragnobo)

Posts: 42

Eminent Member

Topic starter

Mano muito estranho mesmo tipo eu faço o procedimento que vc falou, Porem quando eu salvo tudo e fecho e abro denovo a planilha na barra a esquerda onde fica o codigo A1:U34 esta em branco.

Não sei se estou fazendo algo errado to perdidinho nessa questão.

Fui util ? Ajudei ?

Não esqueça de agradeçer Resolveu a duvida marque o topico como resolvido. :mrgreen:

Postado : 06/03/2013 6:47 pm