Excel'de açılır listeden seçilen değere dayalı olarak makro nasıl çalıştırılır?
Makroları komut düğmesine tıklayarak çalıştırmak Excel'de yaygın bir görevdir, ancak makro kodlarını açılır listeden seçilen değere göre çalıştırmayı hiç denediniz mi? Bu, açılır listeden bir öğe seçtiğinizde, belirli makronun aynı anda tetikleneceği anlamına gelir. Bu makale, bu işi çözmeniz için faydalı bir kod sunacaktır.
VBA kodu ile açılır listeden seçilen değere göre makroyu çalıştır
VBA kodu ile açılır listeden seçilen değere göre makroyu çalıştır
Bu görevi bitirmenin doğrudan bir yolu yoktur, ancak aşağıdaki VBA kodu size yardımcı olabilir, lütfen şunu yapın:
1. Öncelikle, ihtiyacınız olan bir açılır liste oluşturun, ekran görüntüsüne bakın:
2. Ardından, kullanmak istediğiniz açılır menüyü içeren sayfa sekmesine sağ tıklayın ve ardından Kodu Görüntüle bağlam menüsünden ve açılan Uygulamalar için Microsoft Visual Basic penceresinde, aşağıdaki kodu boş Modüle kopyalayıp yapıştırın:
VBA kodu: Açılır listeden seçilen değere göre makroyu çalıştırın:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("E1")) Is Nothing Then
Select Case Range("E1")
Case "Insert Blank rows": Macro1
Case "Hide All Sheets": Macro2
Case "Convert to Date": Macro3
End Select
End If
End Sub
not: Yukarıdaki kodda, E1 hücre açılır listeyi içerir, makro adlarını değiştirin ve açılır liste değerlerini ihtiyaçlarınıza göre değiştirin.
3. Ve sonra bu kod penceresini kaydedip kapatın, şimdi, açılır listeden Boş satır ekle öğesini seçtiğinizde, Makro1 tetiklenecek ve bu böyle devam edecek…
İlgili yazılar:
Excel'de hücre değeri değiştiğinde makro nasıl çalıştırılır?
Excel'de hücre değerine göre makro nasıl çalıştırılır?
Excel'de yazdırmadan önce makro otomatik olarak nasıl çalıştırılır?
Excel'de köprülere tıklayarak makro nasıl çalıştırılır?
Çalışma kitabından sayfa seçildiğinde makro nasıl çalıştırı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!