Views

...

Important:

Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog podem ser tratados como consultoria freelance.

E-mails

Deixe seu e-mail para receber atualizações...

eBook Promo

Mostrando postagens com marcador turn on. Mostrar todas as postagens
Mostrando postagens com marcador turn on. Mostrar todas as postagens

VBA Excel - Autofiltro - Acionando o AutoFiltro da nossa Lista - Excel List AutoFilter VBA - Turn On List AutoFilter





Segue mais um exemplo de programação VBA para manipular AutoFiltro no MS Excel. 

O uso desse código nas listas de dados contidas nas tabelas das nossas planilhas.

Quando nomeamos as nossas tabelas de dados constituimos um ListObject, o qual automaticamente recebe a sua própria propriedade AutoFiltro.

Autofiltro - Mostrando todos os registros (Show All Records)
Autofiltro - Acionando o AutoFiltro da nossa Lista (Turn On List AutoFilter)
Autofiltro - Desligando a Lista de AutoFiltro (Turn Off List AutoFilter)
Autofiltro - Contando as Listas de AutoFiltros (Count List AutoFilters)
Autofiltro - Ocultando todas as Setas da lista de AutoFiltro, exceto uma (Hide Arrows Specific Columns)
Autofiltro - Ocultando Setas específicas nas listas de AutoFiltro (Hide Arrows Specific Columns)
Autofiltro - Visualizar todas as setas da Lista AutoFiltro (Show All List AutoFilter Arrows)
Autofiltro - Copiando Linhas filtradas específicas, sem os títulos (Copy Filtered List Rows Without Headings)
Autofiltro - Copiando Linhas filtradas específicas, com os títulos (Copy Filtered List Rows With Headings)
Autofiltro - Conte as Linhas Visíveis da Lista (Count Visible List Rows)

Acionado o AutoFiltro da nossa Lista

Ao usar o código a seguir, você ligará o AutoFiltro do Excel na 1ª lista da planilha ativa.
Sub TurnAutoFilterOnList1()
' Liga o AutoFiltro na 1ª lista.

Dim Lst As ListObject

Set Lst = ActiveSheet.ListObjects (1)

Let Lst.ShowAutoFilter = True
End Sub

Tags: VBA, Excel, List, AutoFilter, autofiltro, worksheet, Show, Turn On, 



Tags: , , , , , , ,

Excel VBA - AutoFiltro - Mostrando todos os Registros numa planilha protegida - AutoFilter VBA








Se a planilha está protegida, sem senha, use este código para desprotegê-la, mostre tudo, e então coloque a proteção novamente.

Veja:

Sub ShowAllProtected()

With ActiveSheet
    .Unprotect
    .ShowAllData
    .Protect _
        Contents:=True, _
        AllowFiltering:=True, _
        UserInterfaceOnly:=True
End With


End Sub

Tags: VBA, Excel, Autofilter, filtro, AutoFiltro, worksheet, filtered, desligar, turn on,


Tags: , , , , , , , ,

Excel VBA - AutoFiltro - Mostrando todos os Registros do Filtro numa planilha protegida com senha - AutoFilter VBA








Se a planilha estiver protegida com senha, use um código para desprotegê-la, mostre tudo, e então coloque a proteção novamente.

Veja abaixo:

Sub ShowAllProtectedPwd()
Dim strPwd As String
strPwd = "andrebernardes"

With ActiveSheet
    .Unprotect Password:=strPwd
    .ShowAllData
    .Protect _
        Contents:=True, _
        AllowFiltering:=True, _
        UserInterfaceOnly:=True, _
        Password:=strPwd
End With

End Sub


Tags: VBA, Excel, Autofilter, filtro, AutoFiltro, worksheet, filtered, desligar, turn on,


Tags: , , , , , , , ,

Excel VBA - AutoFiltro - Ligue o AutoFiltro do MS Excel - AutoFilter VBA








Saber ligar os AutoFiltros numa aplicação pode ser útil. 

Veja abaixo:

Ligue o AutoFiltro do MS Excel

Use este código para ligar um AutoFiltro do Excel, caso não exista nenhum.


Sub TurnAutoFilterOn()

  If Not ActiveSheet.AutoFilterMode Then

    ActiveSheet.Range("A1").AutoFilter

  End If

End Sub

Tags: , , , , , , , ,
Assinar: Postagens (Atom)

eBooks VBA na AMAZOM.com.br

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...

Vitrine