Notifications
Clear all

Excel bloqueado

10 Posts
5 Usuários
0 Reactions
2,630 Visualizações
(@cazevedo)
Posts: 0
New Member
Topic starter
 

Boa tarde amigos, estou precisando trabalhar em um arquivo que está com as Faixas de Opções bloqueadas, e a aba "Opções" nem aparece. Sabem o que posso fazer para habilitá-las novamente?

Seguem duas telas para verem como está o arquivo.

Abs

 
Postado : 10/05/2017 2:15 pm
(@brunoxro)
Posts: 0
New Member
 

Boa tarde,

Outros arquivos de Excel no seu computador estão normais?

att,

 
Postado : 10/05/2017 2:31 pm
(@cazevedo)
Posts: 0
New Member
Topic starter
 

Sim. só este que me foi enviado está assim.

 
Postado : 10/05/2017 2:42 pm
(@fcarlosc)
Posts: 0
New Member
 

Boa-tarde

Provavelmente foi bloqueada dessa forma.

Na guia Revisão, Protegeram a Planilha e a Pasta de Trabalho. (Boa parte dos recursos são desativadas).
Após isso, foi feito o seguinte: Clicaram no botão do Office -> Opções do Excel -> Personalizar a faixa de opções
Ao lado direito desabilitaram todas as opções de Menus e salvaram o arquivo.

 
Postado : 12/05/2017 11:51 am
(@lucianorn)
Posts: 0
New Member
 

Bem tente com este código, poderá habilita-las novamente.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim barras
On Error Resume Next
For Each barras In Application.CommandBars
    barras.Enabled = True  'habilitar as barras de comando(CommandBARS)
Next
Application.DisplayFullScreen = True
ActiveWindow.WindowState = xlMaximized
ActiveWindow.DisplayHeadings = True
Application.DisplayFormulaBar = True
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
Application.DisplayStatusBar = True
Application.ScreenUpdating = True
End Sub
 
Postado : 25/05/2017 9:04 am
(@pfarias)
Posts: 0
New Member
 

A pasta de trabalho foi bloqueada e a macro inicial está ocultando a faixa de opções. Abra a pasta de trabalho direto do próprio Excel, não clicando com o arquivo sobre ele. Antes de clicar em abrir, segure SHIFT. O procedimento dentro do evento OPEN no VBA, não irá ocorrer e provavelmente visualizará todo a faixa de opções.
Esse procedimento desabilitará todas as macros dentro da pasta de trabalho. Mas ela continuará protegida.

 
Postado : 25/05/2017 9:11 am
(@cazevedo)
Posts: 0
New Member
Topic starter
 

E como faço para rodar esse Private? Nao é como Sub né?
Abs

Bem tente com este código, poderá habilita-las novamente.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim barras
On Error Resume Next
For Each barras In Application.CommandBars
    barras.Enabled = True  'habilitar as barras de comando(CommandBARS)
Next
Application.DisplayFullScreen = True
ActiveWindow.WindowState = xlMaximized
ActiveWindow.DisplayHeadings = True
Application.DisplayFormulaBar = True
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
Application.DisplayStatusBar = True
Application.ScreenUpdating = True
End Sub
 
Postado : 25/05/2017 12:26 pm
(@cazevedo)
Posts: 0
New Member
Topic starter
 

Fiz o procedimento, mas continua sem aparecer a faixa de opções.
:(

A pasta de trabalho foi bloqueada e a macro inicial está ocultando a faixa de opções. Abra a pasta de trabalho direto do próprio Excel, não clicando com o arquivo sobre ele. Antes de clicar em abrir, segure SHIFT. O procedimento dentro do evento OPEN no VBA, não irá ocorrer e provavelmente visualizará todo a faixa de opções.
Esse procedimento desabilitará todas as macros dentro da pasta de trabalho. Mas ela continuará protegida.

 
Postado : 25/05/2017 12:28 pm
(@fcarlosc)
Posts: 0
New Member
 

Boa-tarde Cazevedo

Esse arquivo pode ser disponibilizado...!?

 
Postado : 25/05/2017 12:38 pm
(@pfarias)
Posts: 0
New Member
 

Boa-tarde Cazevedo

Esse arquivo pode ser disponibilizado...!?

Até pensei em perguntar o mesmo, mas pensei que fosse um arquivo que não teria a possibilidade!! :D

 
Postado : 25/05/2017 12:44 pm