Bagaimana cara mengaktifkan sheet menggunakan vba?

Katakanlah Anda bekerja dengan beberapa lembar kerja dan sulit bagi Anda untuk menavigasi ke satu lembar menggunakan tab. Dalam situasi ini, Anda bisa menggunakan kode VBA untuk mengaktifkan lembar kerja apa pun.

Dan, untuk menulis kode VBA untuk ini, Anda perlu menggunakan metode Worksheet.Activate. Pada artikel ini, saya ingin berbagi dengan Anda cara mudah menulis kode ini untuk mengaktifkan atau memilih lembar kerja. Sebelum menulis kode ini, Anda harus memahami cara ini.

Lembar Kerja. Metode Aktifkan

Pada metode ini, Anda bisa menentukan nama atau nomor lembar kerja yang ingin Anda aktifkan. Misalkan Anda perlu mengaktifkan sheet 1, maka kodenya adalah:

 Worksheets("Sheet1").Activate

Atau bisa juga menggunakan nomor lembar.

 Worksheets("1").Activate

Jadi kode terakhirnya adalah:

 Sub ActivateSheet1() Worksheets("Sheet1").Activate End Sub

Contoh: Aktifkan Spreadsheet dengan VBA

Dalam kehidupan nyata, Anda dapat menggunakan metode ini dengan berbagai cara. Berikut ini beberapa.

1. Aktifkan spreadsheet saat dibuka

Jika Anda ingin mengaktifkan lembar kerja tertentu setiap kali Anda membuka buku kerja, beri nama kode VBA ini auto_open.

 Sub auto_open() Worksheets("Sheet1").Activate End Su

2. Aktifkan satu lembar kerja dan sembunyikan lembar kerja lainnya

Mungkin Anda ingin membuka satu lembar kerja dan menyembunyikan semua lembar kerja lainnya di buku kerja. Anda dapat melakukannya menggunakan kode di bawah ini.

 Sub HideWorksheet() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets If ws.Name <> "Sheet1" Then ws.Visible = xlSheetHidden End If Next ws End Sub

Ubah nama sheet dari kode di atas agar lebih bermanfaat.