Cara menampilkan semua kolom menggunakan vba (dengan contoh)

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

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

 Sub UnhideAllColumns()

Columns.EntireColumn.Hidden = False

End Sub

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

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara menampilkan semua kolom menggunakan VBA

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

Sekarang misalkan kita menyorot kolom A dan B, lalu klik kanan lalu klik Sembunyikan :

Kedua kolom akan disembunyikan:

Sekarang katakanlah kita ingin menggunakan VBA untuk secara otomatis menampilkan semua kolom pada lembar ini.

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub UnhideAllColumns()

Columns.EntireColumn.Hidden = False

End Sub

Setelah makro ini dijalankan, semua kolom akan terlihat:

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

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

 Sub UnhideAllColumnsAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Columns.EntireColumn.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 kolom 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 menampilkan semua sheet
VBA: Cara menemukan kolom yang terakhir digunakan
VBA: Cara menghitung jumlah kolom yang digunakan