disable filter mode

  1. minggu lalu

    dear all @master BE-ORG yg saya hormati, sy pnya masalah dengan baris yg terhidden karena filter mode, bagaimana script untuk mendisable filter mode,

    If Sheet15.AutoFilterMode Then
    Sheet15.AutoFilterMode = False
    End If
    Worksheets("Sheet15").Cells(Rows.Count, 1).End(xlUp).EntireRow.Hidden = False

    saya pakai ini kq ttp terhiden barisnya, terima kasih

  2. Caton

    Des 2 Terverifikasi Indonesia + 15.163 Poin

    @bejo ....

    Gunakan script seperti berikut untuk menampilkan kembali seluruh baris data :

    ...
    If Sheet15.AutoFilterMode Then
        '+-- Tampilkan seluruh data.
        Sheet15.ShowAllData
    End If
    Worksheets("Sheet15").Cells(Rows.Count, 1).End(xlUp).EntireRow.Hidden = False
    ...

    Demikian.

  3. 7 hari yang lalu

    terima kasih banyak master @Caton

  4. 6 hari yang lalu

    Caton

    Des 3 Terverifikasi Indonesia + 15.163 Poin

    @bejo ...

    Sama-sama mas.

    Tambahan sedikit, sebaiknya script tersebut diubah saja menjadi seperti berikut :

    ...
    On Error Resume Next
    If Sheet15.AutoFilterMode Then
        Sheet15.AutoFilter.ShowAllData
    End If
    Sheet15.Columns(1).EntireRow.Hidden = False
    Err.Clear: On Error GoTo 0
    ...

    Demikian.

 

atau Mendaftar untuk ikut berdiskusi!