Cara menampilkan semua sheet menggunakan vba (dengan contoh)

Anda bisa menggunakan properti Terlihat di VBA untuk menampilkan lembar di buku kerja Excel.

Untuk menampilkan semua lembar dalam buku kerja, Anda bisa menggunakan sintaks berikut:

 Sub UnhideAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Visible = True
    Next ws

End Sub

Menggunakan loop For Each sederhana dan menentukan Visible = True , kami memberi tahu Excel untuk menampilkan semua lembar di buku kerja.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh : Cara menampilkan semua sheet menggunakan VBA

Misalkan kita memiliki buku kerja Excel dengan empat lembar:

Sekarang misalkan kita klik kanan Sheet4 lalu klik Hide :

Katakanlah kita ulangi proses ini dengan Sheet2 sehingga satu-satunya sheet yang terlihat sekarang adalah Sheet1 dan Sheet3 .

Katakanlah kita ingin menggunakan VBA untuk menampilkan semua lembar di buku kerja.

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub UnhideAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Visible = True
    Next ws

End Sub

Setelah makro ini dijalankan, semua lembar di buku kerja akan ditampilkan:

Catatan : Anda dapat menemukan dokumentasi lengkap untuk properti Visible 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 menemukan kolom yang terakhir digunakan
VBA: Cara membekukan panel