Notifications
Clear all

BARRA DE ROLAGEM NÃO SE LOCOMOVE

10 Posts
2 Usuários
0 Reactions
1,312 Visualizações
(@higorterra)
Posts: 9
Active Member
Topic starter
 

Amigos, boa noite

Preciso muito da ajuda de algum de vocês.

Eu criei um UserForm para alternar as minhas planilhas, através de um botão de comando.

Após, criei um botão para chamar esse UserForm na minha planilha inicial.

Só que quando seleciono a aba pelo botão de comando do meu UserForm, ele vai até a aba selecionada, porém, a página só se locomove quando eu clico nas setinhas.

Quando rolo pelo mouse, a barra até se locomove, só que a página não anda.

Algúem tem a solução para esse problema ou poderia indicar algum outro método que eu possa usar um botão de comando para selecionar as abas.

Sou novo por aqui e desde já agradeço a atenção de vocês.

 
Postado : 05/01/2017 8:37 pm
DJunqueira
(@djunqueira)
Posts: 772
Prominent Member
 

É possível q vc esteja usando o procedimento 'Select' alguma célula, isto faria com q ao selecionar uma outra aba vc "entrasse" dentro da célula e deste modo ficasse sem o controle da aba.
Procure trocar p/ selecionar apenas a planilha.

Alternativamente vc poderia usar hiperlink no lugar de macro.

Se sua dúvida foi respondida marque o tópico como RESOLVIDO usando o botão com marca verde.

 
Postado : 05/01/2017 11:07 pm
(@higorterra)
Posts: 9
Active Member
Topic starter
 

Eu realmente estava usando um código que procurava por um procv dentro de uma célula o valor da planilha selecionada pelo procedimento 'Select'.

Troquei o código por um outro com comando 'Activate' e o problema persistiu.

Segue abaixo os dois códigos utilizados:

CÓDIGO 1 - SELECT

Private Sub ComboBox1_Change()

Sheets("CADASTRO").Range("O3").Value = ComboBox1.Value
Sheets(Sheets("CADASTRO").Range("N3").Value).Select

End Sub
------------------------------------------------

Private Sub UserForm_Activate()
ComboBox1.RowSource = "CADASTRO!A3:A" & Sheets("CADASTRO").Range("A3").End(xlDown).Row

End Sub

-------------------------------------------------------------------------------------------------------------------------------------------------------------

CÓDIGO 2 - 'ACTIVATE'

Private Sub ComboBox1_Change()

Sheets(ComboBox1.ListIndex + 1).Activate

End Sub
-----------------------------------------------------

Private Sub UserForm_Initialize()

Dim Plan As Worksheet
For Each Plan In ActiveWorkbook.Worksheets
ComboBox1.AddItem Plan.Name
Next Plan

End Sub

Tem alguma coisa coisa que eu possa incluir, alterar ou excluir?

 
Postado : 06/01/2017 7:06 am
DJunqueira
(@djunqueira)
Posts: 772
Prominent Member
 

Se vc trocou o código 1 pelo 2 me parece q deveria estar tudo ok.

P/ dar uma opinião mais avalizada anexe a planilha.

Se sua dúvida foi respondida marque o tópico como RESOLVIDO usando o botão com marca verde.

 
Postado : 06/01/2017 8:06 pm
(@higorterra)
Posts: 9
Active Member
Topic starter
 

Ai amigo, segue a planilha em anexo

 
Postado : 07/01/2017 8:32 am
DJunqueira
(@djunqueira)
Posts: 772
Prominent Member
 

Aqui comigo não houve problema com as barras de rolagem.

Aproveitei a oportunidade e fiz algumas melhorias nas suas fórmulas.

Se sua dúvida foi respondida marque o tópico como RESOLVIDO usando o botão com marca verde.

 
Postado : 07/01/2017 10:08 am
(@higorterra)
Posts: 9
Active Member
Topic starter
 

Muito obrigado. A barra de rolagem quando seleciono pelo botão continua não se locomovendo pelo mouse, apenas quando clico na setinha. Vou testar em outro computador.

Qual Excel você usa? O meu é o 2013.

Vou criar uma nova versão usando botões com macros, só não sei como fazer isso para deixar automático quando criar um novo funcionário e excluir um funcionário.

Nesse caso também gostaria de deixar um novo botão já agrupado e posicionado com os outros.

Ainda sou novo com o Excel, tenho muito a aprender e as suas novas fórmulas irão auxiliar muito.

 
Postado : 07/01/2017 12:55 pm
DJunqueira
(@djunqueira)
Posts: 772
Prominent Member
 

Uso o Office 365 2016

As vezes é melhor deixar o funcionário catalogado como inativo p/ não atrapalha a base de dados.

Vc poderia usar mais o hiperlink p/ navegar entre as planilhas.

Fico feliz por ter ajudado.

Se sua dúvida foi respondida marque o tópico como RESOLVIDO usando o botão com marca verde.

 
Postado : 07/01/2017 11:18 pm
(@higorterra)
Posts: 9
Active Member
Topic starter
 

Como assim catalogado como inativo?

Tem como eu usar hiperlink no Excel 2013 sem mostrar as guias de planilha?

 
Postado : 10/01/2017 7:26 am
DJunqueira
(@djunqueira)
Posts: 772
Prominent Member
 

Eu não sei como vai evoluir seus dados, mas muitas vezes quando vc exclui um funcionário algumas fórmulas relacionadas ao passado deixam de informar quem foi responsável pelo q.
Para tornar o funcionário 'inativo' basta acrescentar uma coluna SIM/NÃO.

Vc poderia usar o hiperlink p/ navegar pelas guias já visíveis...

Se sua dúvida foi respondida marque o tópico como RESOLVIDO usando o botão com marca verde.

 
Postado : 10/01/2017 6:10 pm