[ÇÖZÜLDÜ] Belirlenen bir hücredeyken mesaj kutusunun gösterilmesi Hk.

[enteresan]

Sevgili Excel dostları,
Kullanmakta olduğum bir dosyada imleç b5 hücresine geldiğinde bir mesaj kutusunun çıkmasını ve mesaj kutusunda "girdiğiniz numara 12345678. Doğru mu?" şeklinde uyarı vermesini istiyorum. Buradaki rakamları alacağı hücre için c9 hücresini belirlemek istiyorum. Doğru ise Evet tuşuna basmak ve devam etmek, yanlış ise yanlış tuşuna basarak, numarayı değiştirmek için kullandığım userformu çağırmak istiyorum. Bu konuda bir makro hazırlamak mümkün müdür? Seygılarımla....

 

[Levent Menteşoğlu]

Aşağıdaki kodu sayfanın kod sayfasına kopyalayharak deneyin.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$B$5" Then Exit Sub
sor = MsgBox("girdi&#287;iniz numara " & [c9] & ". Do&#287;ru mu", 52, "Uyar&#305;")
If sor = vbNo Then
'.formu &#231;a&#287;&#305;raca&#287;&#305;n&#305;z kodlar
Exit Sub
Else
'.devam edecek kodlar
End If
End Sub

 

[enteresan]

Sayın Levent Bey,
ilginize teşekkür ederim, oradaki 12345678 rakamları sabit değil. c9 hücresinde ne yazıyorsa mesaj kutusunda da onu göstermesini istiyorum. O kısmını değiştirebilir miyiz?

 

[Levent Menteşoğlu]

Yukarıdaki kodda gerekli düzeltmeyi yaptım.

 

[enteresan]

Teşekkür eder, saygılar sunarım....