Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara menavigasi di antara lembar kerja dengan menggunakan daftar drop-down di Excel?

Misalkan, Anda memiliki buku kerja yang berisi beberapa lembar kerja, sekarang, Anda perlu membuat daftar drop-down atau kotak kombo yang mencantumkan semua nama lembar dan ketika Anda memilih satu nama lembar dari daftar drop-down, itu akan langsung melompat ke lembar itu. Artikel ini, saya akan memperkenalkan cara menavigasi antar lembar kerja dengan menggunakan daftar drop-down di Excel.

Menavigasi antar lembar kerja dengan menggunakan daftar drop-down di Excel


Menavigasi antar lembar kerja dengan menggunakan daftar drop-down di Excel

Untuk melompat ke setiap lembar yang dipilih dengan menggunakan daftar tarik-turun, lakukan dengan langkah-langkah berikut:

1. Klik Pengembang > Menyisipkan > Kotak Kombo (Kontrol ActiveX), lihat tangkapan layar:

2. Lalu seret mouse untuk menggambar kotak kombo, lalu klik kanan, pilih Lihat kode dari menu konteks, lihat tangkapan layar:

3. Di tempat terbuka Microsoft Visual Basic untuk Aplikasi jendela, salin dan tempel kode berikut untuk mengganti kode asli, lihat tangkapan layar:

Kode VBA: Menavigasi antar lembar kerja dengan menggunakan daftar drop-down

Private Sub ComboBox1_Change()
'Updateby Extendoffice
    If ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_DropButtonClick()
    Dim xSheet As Worksheet
    On Error Resume Next
    Application.ScreenUpdating = False
    Application.EnableEvents = False
    If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
        ComboBox1.Clear
        For Each xSheet In ThisWorkbook.Sheets
            ComboBox1.AddItem xSheet.Name
        Next xSheet
    End If
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
    If ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub

4. Kemudian simpan dan tutup jendela kode ini, lalu klik Mode Desain untuk mematikan mode desain, sekarang, ketika memilih satu nama lembar dari kotak kombo, itu akan pergi ke lembar itu sekaligus, lihat tangkapan layar:


Menavigasi antar lembar kerja dengan menggunakan hyperlink atau tombol:

Dengan Kutools untuk Excel's Buat Daftar Nama Lembar utilitas, Anda bisa dengan cepat mencantumkan semua nama lembar kerja di lembar baru dengan hyperlink atau tombol makro, lalu Anda bisa menavigasi di antara mereka sesuai kebutuhan Anda.

Kutools untuk Excel: dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari. Unduh dan uji coba gratis Sekarang!


Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2021 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap Uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
tab kte 201905

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Urutkan komentar berdasarkan
komentar (12)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Bagaimana saya bisa mengaktifkan lembar tersembunyi dan menyembunyikan halaman beranda?
Komentar ini diminimalkan oleh moderator di situs
Bagaimana saya bisa menambahkan hanya lembar tertentu? dan tidak semua lembar di buku kerja
Komentar ini diminimalkan oleh moderator di situs
Apakah Anda senang menemukan kode untuk hanya menampilkan lembar tertentu di kotak tarik-turun?
Komentar ini diminimalkan oleh moderator di situs
Bagaimana Anda mengubah ini menjadi hanya menampilkan/memilih lembar kerja yang terlihat?
Komentar ini diminimalkan oleh moderator di situs
Hai,
Untuk mengabaikan lembar tersembunyi dari daftar turun bawah, dan hanya menyimpan lembar kerja yang terlihat, kode VBA berikut dapat membantu Anda:

Sub ComboBox1_Change () Pribadi
'Perbarui oleh Extendoffice
Jika ComboBox1.ListIndex > -1 Kemudian Sheets(ComboBox1.Text).Pilih
End Sub
Sub ComboBox1_DropButtonClick() Pribadi
Redupkan xSheet Sebagai Lembar Kerja
On Error Resume Next
Application.ScreenUpdating = Salah
Application.EnableEvents = Salah
Jika ComboBox1.ListCount <> Buku Kerja Ini.Sheets.Count Kemudian
ComboBox1.Hapus
Untuk Setiap xSheet Dalam Buku Kerja Ini.Sheets
Jika xSheet.Visible Kemudian
ComboBox1.AddItem xSheet.Name
End If
xSheet berikutnya
End If
Application.EnableEvents = Benar
Application.ScreenUpdating = Benar
End Sub
Sub ComboBox1_GotFocus() Pribadi
Jika ComboBox1.ListCount <> 0 Maka ComboBox1.DropDown
End Sub

Silakan dicoba, semoga bisa membantu Anda!
Komentar ini diminimalkan oleh moderator di situs
Itu berhasil! Terima kasih! Apakah Anda tahu jika kode ini akan menyebabkan masalah jika lembar diganti namanya atau akan memperbarui daftar secara otomatis?
Komentar ini diminimalkan oleh moderator di situs
Halo,
Kode di atas berfungsi dengan baik saat mengganti nama nama sheet dan item dalam daftar drop-down akan diperbarui secara otomatis.
Kamu bisa mencobanya.
Komentar ini diminimalkan oleh moderator di situs
terima kasih untuk kode Anda. Ini berfungsi untuk mengganti lembar yang berbeda berdasarkan daftar dropdown.
Tapi saya punya beberapa pertanyaan.
1. setelah saya memproses lembar terkait, dan ingin kembali ke menu utama (dengan daftar dropdown lembar), bagaimana saya bisa melakukannya tanpa menggunakan mouse?
2. ketika saya membuka file, saya ingin menu utama (dengan daftar dropdown) sebagai default. Jadi saya bisa mulai dari menu ini
Terima kasih
mawar
Komentar ini diminimalkan oleh moderator di situs
hi there,
Terima kasih banyak untuk kode yang membuat kotak kombo dinamis untuk menavigasi lembaran. Sayangnya saya mendapat kesalahan. Setelah menavigasi beberapa lembar, file secara otomatis ditutup. Itu bahkan tidak menunjukkan pesan kesalahan apa pun. Aku tidak tahu alasannya. Saya menghargai bantuannya
Terima kasih
Komentar ini diminimalkan oleh moderator di situs
kesalahan yang sama juga, Apakah Anda mengetahuinya?
Komentar ini diminimalkan oleh moderator di situs
hai, apakah mungkin untuk menggabungkan berbagai opsi dari dropdown yang berbeda dan membuka lembar yang sesuai.

misalnya: jika Option1 dari dropdown1 dipilih dan Option2 dari dropdown2 dipilih maka hanya Sheet2 yang akan terbuka
Komentar ini diminimalkan oleh moderator di situs
Daftar drop down tidak akan membuka lembar tersembunyi, apakah bisa membuka lembar tersembunyi?
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL