Mesaj Kutusu?

[raysefo]

Selam,

Excelde herhangi bir hücreye belirli bir şarta bağlı veri girildiğinde mesaj kutusu çıkmasını istiyorum. Yardımcı olursanız memnun olurum.

Teşekkürler.

 

[Ali]

Excelde herhangi bir hücreye belirli bir şarta bağlı veri girildiğinde

Nasıl bir şart mesela ?

 

[Seyit Tiken]

Böyle bir şey mi? istemiştiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") > 0 Then
MsgBox "A1 Hücresine Veri Girdiniz"
End If
End Sub

 

[raysefo]

Selam,

Mesela C3 hücresine girilen veri 1000 den büyükse bir mesaj verecek. Ben bu Private Sub WorkSheet_Change... kodunu nereye yazacağım?

Teşekkür ederim

 

[algil]

eki einceleyiniz.

 

[Seyit Tiken]

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") > 1000 Then
MsgBox "A1 Hücresine Veri Girdiniz"
End If
End Sub

 

[Ali]

Sn raysefo, Sn algil'in, yaptığı gibi yapmak isterseniz nasıl yapıldığını Sn danersin, açıklamış.

http://www.excel.web.tr/viewtopic.php?t=3019

Sn Seyit Tiken'in , önerdiği gibi yapmak isterseniz
Sn isakarakus'un, excel dersanesi için hazırladığı kısımları inceleyebilirsiniz

http://www.excel.web.tr/viewtopic.php?t=4597