Ir ao conteúdo
  • Cadastre-se
Julio Oviedo

Excel Habilitar Auto Filtro, Macro desabilitou.

Recommended Posts

Amigos...
estou quebrando a cabeça com uma planilha que elaborei para que eu controle o recebimento de matéria primas e insumos, já consegui deixar ela com as funcionalidades que eu preciso. Porém ao utilizar uma macro que executa o bloqueio da célula após o preenchimento pelo usuário afim de que se mantenha protegido por exclusões/alterações acidentais, essa MACRO desabilita o Auto Filtro, impedindo que se utilize da funcionalidade, uma vez que usuários irão consultar a planilha se utilizando o filtro.

As células estão autobloqueadas A20:U600 - Senha: GUAPORECIBIMIENTO

Macro que utilizei:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A20:U600")) Is Nothing Then
Exit Sub
Else
If Target.Value <> "" Then
Target.Select
ActiveSheet.Unprotect "GUAPORECIBIMIENTO"
Selection.Locked = True
End If
ActiveSheet.Protect "GUAPORECIBIMIENTO", DrawingObjects:=True, Contents:=True, Scenarios:=True
ActiveSheet.EnableSelection = xlUnlockedCells
End If
End Sub

CARTÓN DE SITUACIÓN - copia.xlsx

Compartilhar este post


Link para o post
Compartilhar em outros sites

Acrescente o comando em vermelho, conforme abaixo.

 

ActiveSheet.Protect "GUAPORECIBIMIENTO", DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True

  • Obrigado 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Desconheço a existência dessa lista.

Clique sobre o comando e aperte F1 para acessar a ajuda do VBA.

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×