Excel'de bir Combo Box'ın seçilen değerine göre belirli bir çalışma sayfası nasıl açılır?
Geçerli çalışma kitabının tüm sayfa adlarını aşağıda gösterilen ekran görüntüsü gibi içeren bir Combo Box'a sahip olduğunuzu varsayarsak. Ve şimdi, Birleşik Giriş Kutusunda karşılık gelen sayfa adını seçerken belirli bir çalışma sayfasını açmak istiyorsunuz. Nasıl başarılır? Bu makaledeki yöntem size yardımcı olabilir.
VBA kodu ile bir Combo Box'ın seçilen değerine göre belirli bir çalışma sayfasını açın
VBA kodu ile bir Combo Box'ın seçilen değerine göre belirli bir çalışma sayfasını açın
Aşağıdaki VBA kodu, Excel'deki Combo Box seçimine göre belirli bir çalışma sayfasına gitmenize yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın.
not: Birleşik Giriş Kutusu çalışma sayfanızda herhangi bir sayfa adı içermiyorsa, tüm sayfa adlarını bu Birleşik Giriş Kutusuna hızlı bir şekilde eklemek için lütfen aşağıdaki ipucunu izleyin. Tüm sayfa adlarını içeren bir Combo Box zaten varsa, lütfen 1 adım direkt olarak.
Bahşiş: Çalışma sayfanıza bir Komut Düğmesi 1 ekleyin, sağ tıklayın ve seçin Kodu Görüntüle sağ tıklama menüsünden. Ardından aşağıdaki VBA kodunu kopyalayıp Kod penceresini açın ve Ara Toplam + Q kapatmak için anahtarlar Uygulama için Microsoft Visual Basic pencere. Eklenen Komut Düğmesine tıklayın, ardından geçerli çalışma kitabının tüm sayfa adları ComboBox1'e otomatik olarak eklenecektir.
VBA kodu: Tüm sayfa adlarını bir Combo Box'a kolayca ekleyin
Private Sub CommandButton1_Click()
Me.ComboBox1.Clear
Dim strWs As String
Dim i As Integer
For i = 1 To ThisWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(i).Name
Next
End SubZaten tüm sayfa adlarını içeren bir Combo Box varsa, lütfen aşağıdaki işlemleri yapın.
1. Açmak Tasarım Modu altında Geliştirici sekmesi.
2. Sayfa adlarının bulunduğu birleşik giriş kutusuna sağ tıklayın, ardından Kodu Görüntüle sağ tıklama menüsünden.
3. Sonra Uygulamalar için Microsoft Visual Basic penceresi açılır, lütfen Kod penceresindeki orijinal VBA kodunu aşağıdaki VBA koduyla değiştirin.
VBA kodu: Seçilen Combo Box değerine göre belirli bir çalışma sayfası açın
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End Subnot: Kodda, ComboBox1, sayfa adlarını içeren birleşik giriş kutusunun adıdır.
4. Tuşuna basın. Ara Toplam + Q kapatmak için anahtarlar Uygulamalar için Microsoft Visual Basic pencereyi kapatın ve Tasarım Modu altında Geliştirici sekmesi.
Şimdi, Combo Box'ta herhangi bir çalışma sayfası adını seçerken, ilgili çalışma sayfası otomatik olarak açılacaktır.
Geçerli çalışma kitabının tüm sayfa adlarını Excel'de kolayca listeleyin:
Çalışma kitabınızdaki sayfa dizini kullanmak, çalışma sayfalarınızı kolaylıkla yönetmenize yardımcı olur. İle Sayfa Adlarının Listesini Oluşturun yarar Kutools for Excel, mevcut çalışma kitabındaki tüm sayfa adlarını içeren bir sayfa dizini kolayca oluşturabilirsiniz. Bundan sonra, Dizin çalışma sayfasındaki sayfa adını tıklayarak hızlı bir şekilde belirli bir çalışma sayfasına geçebilirsiniz. Aşağıdaki ekran görüntüsüne bakın:
Şimdi indirin ve deneyin! (30 günlük ücretsiz iz)
İlgili Makaleler:
- Combo Box değerini Excel'deki etkin hücreye nasıl kopyalarım?
- Excel'de açılan kutu çıktısında tarih biçimini nasıl görüntüleyebilirim?
- Excel'de belirtilen hücre değerine göre bir Komut Düğmesi nasıl gizlenir veya gösterilir?
- Excel'de birleşik giriş kutusuna yazmayı nasıl önleyebilir veya devre dışı bırakabilirim?
- Excel'de belirli bir hücreyi seçmek için açılan kutudan nasıl çıkılır?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
