Cara Mengendalikan Kumpulan Worksheet Excel dengan Macro VBA
Kumpulan worksheet memungkinkan Anda mengacu pada daftar nomor atau nama objek worksheet, dimana daftar nomor mewakili letak worksheet di masing-masing tab sesuai dengan urutannya yaitu dari kiri ke kanan.
Namun suatu variabel bisa dimasukkan ke setiap objek worksheet sebagai jalan masuk ke semua worksheet tanpa harus menghiraukan letak dan nama sheetnya.
Tip berikut ini membahas tentang beragam cara yang dapat dilakukan untuk mengatur kumpulan sheet Excel dengan Macro.
Cara Menambahkan Sheet Baru di Urutan Sheet Terakhir
Anggap saja Anda ingin menambahkan worksheet dan memberi nama sheetnya dengan Latihan1.
Kode macro berikut memberikan perintah VBA menambahkan sebuah worksheet baru, lalu menetapkan nama sheetnya yaitu Latihan1 dan menempatkannya di ujung paling kanan dan paling akhir di tab worksheet, yang mana merupakan daftar nomor worksheet paling tinggi menurut jumlah worksheet yang sudah ada:
Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = "Latihan1"
End Sub
Cara Menempatkan Sheet Baru Sebelum Urutan Sheet Lain yang Sudah Ada
Anda juga bisa menempatkan sebuah sheet baru contohnya Latihan2 di urutan sebelum sheet tertentu yang sudah ada misalnya Sheet1:
Worksheets.Add(Before:=Worksheets("Sheet1")).Name = "Latihan2"
End Sub
Cara Memindahkan Sheet yang Sudah Ada dari Posisinya ke Urutan Posisi Tertentu
Anda juga mungkin ingin memindahkan suatu sheet yang ada di workbook.
Sebagai contoh Anda buat tujuh buah sheet, tugas Anda memindahkan sheet paling akhir yaitu sheet di urutan ke-7 menjadi ke urutan 3.
Untuk mengerjakannya Anda gunakan perintah berikut, anda bisa coba di jendela Immediate VBE, namun sebelumnya pastikan agar sheet urutan ke-7 dalam keadaan aktif:
ActiveSheet.Move After:=Sheets(2)
Setelah Anda menekan tombol Enter buka kembali Excel dan Anda lihat perubahan urutannya.
Demikian pembahasan tentang cara membuat kendali pada kumpulan worksheet di Excel dengan Macro VBA, semoga bermanfaat.