Excel'de hücre değeri "X" e eşitse ileti kutusu nasıl açılır?

Mesaj kutusunu açmak, belirli bir aralıktaki belirli içeriği bulurken çok yardımcı olur. Örneğin, A50: C1 aralığında 7'ye eşit bir hücre değeri buluyorsunuz ve hücre değerinin var olup olmadığını size söyleyen bir mesaj kutusuna ihtiyacınız var. Aşağıdaki iki yöntem size yardımcı olabilir.

Hücre değeri VBA kodu ile "X" e eşitse, mesaj kutusu açılır
Kutools for Excel ile hücre değeri "X" e eşitse, mesaj kutusunu kolayca açın

Hücre değeri VBA kodu ile "X" e eşitse, mesaj kutusu açılır

Aşağıdaki VBA kodu, belirli bir değer belirli aralıkta mevcut olduğunda bir açılır mesaj kutusu oluşturmaya yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın.

1. Çalışma sayfasında, belirtilen aralıktaki değerleri kontrol etmeniz, sayfa sekme çubuğundaki sekme adına sağ tıklamanız ve ardından Kodu Görüntüle sağ tıklama menüsünden. Ekran görüntüsüne bakın:

2. içinde Uygulamalar için Microsoft Visual Basic penceresinde, aşağıdaki VBA kodunu Kod penceresine kopyalayıp yapıştırın.

VBA kodu: Hücre değeri "X" e eşitse açılır mesaj kutusu

Private Sub Worksheet_Change(ByVal Target As Range)
'Update: 2017/7/25
    Dim xCell As Range, Rg As Range
    On Error Resume Next
    Set Rg = Application.Intersect(Target, Range("A1:C7"))
    If Not Rg Is Nothing Then
        For Each xCell In Rg
            If xCell.Value = "50" Then
                MsgBox "guest entered into cell " & xCell.Address, vbInformation, "Kutools for Excel"
                Exit Sub
            End If
        Next
    End If
End Sub
Private Sub Worksheet_selectionChange(ByVal Target As Range)
    Dim xCell As Range, Rg As Range
    On Error Resume Next
    Set Rg = Application.Intersect(Target, Range("A1:C7"))
    If Not Rg Is Nothing Then
        For Each xCell In Rg
            If xCell.Value = "50" Then
                MsgBox "guest entered into cell " & xCell.Address, vbInformation, "Kutools for Excel"
                Exit Sub
            End If
        Next
    End If
End Sub

3. Basın Ara Toplam + Q kapatmak için aynı anda tuşları Uygulamalar için Microsoft Visual Basic penceresini açın ve çalışma sayfasına geri dönün.

Şu andan itibaren, A1: C7 aralığında hücre değerleri değiştirildiğinde ve hücre değeri "50" ye eşit olduğunda, aşağıda gösterilen ekran görüntüsü gibi bir mesaj kutusu alacaksınız.

Ayrıca, hücre değeri varsa mesaj kutusunu açacak aralığı seçebilirsiniz.

notlar:

Kutools for Excel ile hücre değeri "X" e eşitse, ileti kutusu açılır

The Belirli Hücreleri Seçin yarar Kutools for Excel bu sorunu çözmenize de yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın.

1. İçinde hücre değeri olup olmadığını bulmak istediğiniz aralığı seçin ve ardından Kutools > seç > Belirli Hücreleri Seçin. 

2. içinde Belirli Hücreleri Seçin iletişim kutusunu seçin. Hücre seçeneği Seçim türü bölümüne gelin ve ardından eşittir İlk olarak Belirli tür açılır listeye girin ve sonraki metin kutusuna hücre değerini yazın ve son olarak OK düğmesine basın.

Hücre değeri belirtilen aralıkta mevcutsa, aşağıdaki mesaj kutusunu alacaksınız, OK düğmesi, hücre seçilecektir.

Aksi takdirde, aşağıda gösterilen ekran görüntüsü gibi mesaj kutusunu alacaksınız.

Kutools for Excel ile hücre değeri "X" e eşitse, mesaj kutusunu kolayca açın

İlgili yazılar:

• Excel'de hücre sıfır içeriyorsa tüm satır nasıl silinir?
• Excel'de seçimde belirli metin içeren hücreleri nasıl sayabilirim?

En İyi Ofis Üretkenlik Araçları

🤖	Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
	Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
	Süper Arama: Çoklu Ölçütlü VLookup  |   Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
	Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
	Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
	Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu   |  Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz   |  E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
	En İyi 15 Araç Seti:  12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

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...

Devamı ... Ücretsiz indirin...

---

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!

Devamı ... Ücretsiz indirin...