Excel não consigo clicar com o direito do mouse no excel

[Osmarbg]

Boa tarde.

Não consigo mais clicar com o direito do mouse no excel

Isso aconteceu depois que coloquei um  código BVA para ocultar a faixa de opções a barra de planilhas e a de fórmula e outro para mostrar novamente através de link.

o problema é que o mouse parou em qualquer planilha que utilizo, mesmo em branco e funciona normal na planilha que contém o código.

será que tem como criar algum código para o mouse voltar a funcionar com o lado direito?

segue abaixo os códigos que estou utilizando.

Sub Sair()
Dim barras
On Error Resume Next
For Each barras In Application.CommandBars
barras.Enabled = True
Next
Application.DisplayStatusBar = True
Application.DisplayFormulaBar = True
Application.DisplayFullScreen = False
ActiveWindow.DisplayHeadings = True
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
ActiveWindow.DisplayWorkbookTabs = True
ActiveWindow.DisplayWorkbookTabs = False
End Sub

Sub Entrar()
Dim barras, nTela, Cont
On Error Resume Next

For Each barras In Application.CommandBars
barras.Enabled = False
Next
Application.DisplayFullScreen = True
ActiveWindow.DisplayHeadings = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayStatusBar = False


End Sub

 

 

[Patropi]

@Osmarbg

 

Veja se a solução do tópico abaixo pode te ajudar:

 

 

[]s

[Osmarbg]

5 horas atrás, Patropi disse:

@Osmarbg

 

Veja se a solução do tópico abaixo pode te ajudar:

 

 

[]s

Eu já tinha visto este tópico ontem, e não funcionou pra mim.

 

[Patropi]

@Osmarbg

 

Você tentou também com código VBA que consta no tópico um pouco mais abaixo?

[Osmarbg]

6 horas atrás, Patropi disse:

@Osmarbg

 

Você tentou também com código VBA que consta no tópico um pouco mais abaixo?

É um tópico grande, tudo que está ali eu coloquei, mas não funcionou.

eEtou usando o windows 10 e o office 2019.

Não sei se é por isso.

O que acho estranho é que as planilhas novas sem nem um código é que não clicam mais com o direito.

A que está com o código funciona tudo.

[Osmarbg]

21 horas atrás, Patropi disse:

@Osmarbg

 

Você tentou também com código VBA que consta no tópico um pouco mais abaixo?

Sim, foi o que expliquei, testei o primeiro e o segundo, ambos não funcionaram no meu PC.

[OreiaG]

Veja se ajuda.

Abra um arquivo Excel no qual o botão direito não responde.

Coloque o código abaixo em um módulo Standard (Alt+F11 >> Inserir Módulo).

Execute o código e em seguida faça o teste com o mouse.

Sub ResetaBotãoDireito()
 Application.CommandBars("Cell").Enabled = True
 Application.CommandBars("Row").Enabled = True
 Application.CommandBars("Column").Enabled = True
End Sub

 

[Osmarbg]

43 minutos atrás, OreiaG disse:

Veja se ajuda.

Abra um arquivo Excel no qual o botão direito não responde.

Coloque o código abaixo em um módulo Standard (Alt+F11 >> Inserir Módulo).

Execute o código e em seguida faça o teste com o mouse.

Sub ResetaBotãoDireito()
 Application.CommandBars("Cell").Enabled = True
 Application.CommandBars("Row").Enabled = True
 Application.CommandBars("Column").Enabled = True
End Sub

 

Perfeito meu amigo.

simples e direto, voltou a funcionar, muito obrigado.

[Osmarbg]

Meu Exel parou de clicar com o direito do mouse.

Pedi ajuda aqui em outro tópico, me orientaram a colocar o código abaixo.

Eu coloquei e resolveu, mas agora voltou a não clicar com o direito novamente.

Uso o Excel o dia todo no trabalho e esta função está fazendo muita falta, se alguém puder me ajudar a resolver este problema, ficarei grato.

o código que usei e funcionou apenas um dia foi este.

Sub ResetaBotãoDireito()

Application.CommandBars("Cell").Enabled = True

Application.CommandBars("Row").Enabled = True

Application.CommandBars("Column").Enabled = True

End Sub

 

 

 

[Scofieldgyn]

@Osmarbg tente realizar essa operação no editor de registro:

(Iniciar/Executar/Regedit) e renomear a chave abaixo:
- HKEY_CURRENT_USER\Software\Microsoft\Office para Office.old

 

Reinicie o computador, caso não funcione, nos comunique.

[Osmarbg]

10 minutos atrás, Scofieldgyn disse:

@Osmarbg tente realizar essa operação no editor de registro:

(Iniciar/Executar/Regedit) e renomear a chave abaixo:
- HKEY_CURRENT_USER\Software\Microsoft\Office para Office.old

 

Reinicie o computador, caso não funcione, nos comunique.

Este comando funciona até fechar o excel e depois abrir novamente, pois ele cria outra pasta e volta a não clicar novamente.

[Edson Luiz Branco]

Não seria por acaso algum suplemento ou seu modelo inicial (PERSONAL.xlsb) que está carregando na inicialização do Excel? Veja no VBE na Janela Project Explorer (CTRL R) quais os projetos carregados logo que você abre o Excel, sem ter aberto arquivo nenhum.

 

Havendo algum que não sejam os instalados com o Excel (Solver.xlam, etc...) veja se não há em algum deles alguma rotina no Workbook_Open().

 

Também veja por dentro do Excel (Arquivo>Opções>Suplementos) outros suplementos que possam estar carregados que não os normais do Excel (Power Pivot, etc.).