Ativar o AutoFiltro em uma planilha protegida desde o Excel XP/2002 é uma tarefa simples, já que ao protegê-la, a caixa de diálogo oferecida já oferece esta possibilidade.
O problema é que os usuários do Excel 2000, que ainda são muitos não gozam desta funcionalidade. Felizmente, a Microsoft publicou um código em VBA que implementa esta funcionalidade. O código abaixo efetua a proeza:
1 2 3 4 5 6 | Private Sub Workbook_Open() Sheet1.Protect password:="test", DrawingObjects:=True, _ contents:=True, Scenarios:=True, _ userinterfaceonly:=True Sheet1.EnableAutoFilter = True End Sub |
Resumidamente, o código efetua a proteção tradicionalmente e habilita o autofiltro logo em seguida.
A referência e código completo podem ser vistos neste link:
http://office.microsoft.com/en-us/excel/HA010982701033.aspx
Abraços
Tomás Vásquez
www.tomasvasquez.com.br
prezado amigo, gostaria de maiores informações sobre como ativar esta funcionalidade, pois não conheço o processo. Algo tipo: coloco aonde, aciono alguma outra função; se puder me auxiliar indicando um passo a passo agradeceria muito.
João,
Não deixei claro no post, mas a solução proposta é para um problema bem antigo, e para conhecer este problema é preciso ter familiaridade com as funcionalidades de AutoFiltro, Proteção de Planilhas e um pouco de VBA.
Aí é questão de aprendizado.
Abraços
Tomás