Excel'de hücre değerine göre makro nasıl çalıştırılır?
Diyelim ki, çalışma kitabımda birden çok makro kodum var ve şimdi bu kodları hücre değerine göre çalıştırmak istiyorum. Bu makalede, Excel'i kullanırken günlük işlerinizde karşılaşabileceğiniz birkaç durumdan bahsedeceğim.
Hücre değeri VBA kodu ile belirli bir metne eşitse makroyu çalıştırın veya tetikleyin
Hücre değeri, VBA kodu ile belirli bir değerden büyük veya küçükse makroyu çalıştırın veya tetikleyin
Örneğin, A1 hücresindeki değer 10 ile 50 arasındaysa, makro1'i çalıştırın ve değer 50'den büyükse, makro2'yi çalıştırın. Bu işi Excel'de çözmek için lütfen aşağıdaki VBA kodunu uygulayın.
1. Makroyu bir hücre değerine göre yürütmek istediğiniz 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: Hücre değeri şunlardan büyük veya küçükse makroyu çalıştır:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells.Count > 1 Then Exit Sub
If IsNumeric(Target) And Target.Address = "$A$1" Then
Select Case Target.Value
Case 10 To 50: Macro1
Case Is > 50: Macro2
End Select
End If
End Sub
not: Yukarıdaki kodda:
A1 makroyu temel alarak çalıştırmak istediğiniz belirli değeri içeren hücredir;
Durum 10 ila 50: Macro1: değer 10 ile 50 arasında ise, Macro1'i çalıştırın;
Durum Is> 50: Macro2: değer 50'den büyükse, Macro2'yi çalıştırın.
Lütfen bu makro adlarını ve kriterlerini ihtiyacınıza göre değiştirin ve ayrıca aşağıdaki kriterleri de ekleyebilirsiniz. dava komut.
2. Ardından bu kod penceresini kaydedin ve kapatın, şimdi girdiğiniz değer A10 hücresinde 50 ile 1 arasında olduğunda, Makro1 tetiklenecek, girilen değer 50'den büyükse, Makro2 çalıştırılacaktır.
Hücre değeri VBA kodu ile belirli bir metne eşitse makroyu çalıştırın veya tetikleyin
Makroyu bir hücredeki belirli bir metne göre tetiklemek istiyorsanız, örneğin, "Sil" metni girilmişse makro1'i ve "Ekle" metni yazılırsa makro2'yi çalıştırın. Aşağıdaki kod size bir iyilik yapabilir.
1. Makroyu hücre değerine göre yürütmek istediğiniz sayfaya 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: Hücre değeri belirli bir metinse makroyu çalıştırın
Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "Delete" Then
Call Macro1
End If
If target.Value = "Insert" Then
Call Macro2
End If
End Sub
not: Yukarıdaki kodda, "Sil"Ve"Ekle", Makroları temel alarak çalıştırmak istediğiniz hücre metinleridir ve Macro1 ve Macro2 metne dayalı olarak yürütmek istediğiniz makrolardır. Lütfen bunları ihtiyacınıza göre değiştirin.
2. Sonra bu kodu kaydedin ve pencereyi kapatın, şimdi A1 hücresine “Sil” metnini girdiğinizde, makro1 tetiklenir, “Ekle” metni girilirse makro2 çalıştırılır.
İlgili yazılar:
Excel'de hücre değeri değiştiğinde 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 açılır listeden seçilen değere dayalı olarak makro 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!