Cara menampilkan semua baris menggunakan vba (dengan contoh)


Anda dapat menggunakan properti Tersembunyi di VBA untuk menampilkan baris dalam lembar tertentu.

Untuk menampilkan semua baris pada lembar tertentu, Anda dapat menggunakan sintaks berikut:

 Sub UnhideAllRows()

Rows.EntireRow.Hidden = False

End Sub

Dengan menggunakan properti Hidden dan menentukan nilai False , kami memberi tahu Excel untuk menampilkan semua baris pada lembar saat ini.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara menampilkan semua baris menggunakan VBA

Katakanlah kita memiliki lembar Excel dengan informasi tentang pemain bola basket yang berbeda:

Sekarang misalkan kita klik kanan baris 3 lalu klik Sembunyikan :

Katakanlah kita mengulangi proses ini untuk baris 7 dan 8 sehingga kita sekarang memiliki beberapa baris yang tersembunyi di lembar kita:

Sekarang katakanlah kita ingin menggunakan VBA untuk menampilkan semua baris di sheet ini.

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub UnhideAllRows()

Rows.EntireRow.Hidden = False

End Sub

Setelah makro ini dijalankan, semua baris akan ditampilkan:

Perhatikan bahwa semua baris dari kumpulan data asli kita terlihat kembali.

Perhatikan bahwa jika Anda ingin menampilkan semua baris dari semua lembar di buku kerja Excel, Anda bisa membuat makro berikut untuk melakukannya:

 Sub UnhideAllRowsAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Rows.EntireRow.Hidden = False
    Next ws

End Sub

Dengan menggunakan perulangan For Each yang sederhana, kita dapat mengulang setiap lembar di buku kerja kita dan menampilkan semua baris di setiap lembar.

Catatan : Anda dapat menemukan dokumentasi lengkap untuk properti Tersembunyi di VBA di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menemukan baris yang terakhir digunakan
VBA: Cara menampilkan semua sheet
VBA: Cara membekukan panel

Tambahkan komentar

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *