Aralığa belli bir değerden yukarı değer girildiğinde uyarı vermek

[ramazan_58]

f3:gc 1002 aralığına 100 'den yukarı bir değer girildiğinde uyarı veren bir kod yazılabilirmi?Arkadaşlar yardımlarınız için şimdiden teşekkür ederim.Dosyayı ekte sunuyorum

 

[asem]

araçlar
veri
doğrulama
özel
>100 yazacaksınız
girdi iletisinede uyarı yı işaretleyeceksiniz
kolay gelsin.

 

[ramazan_58]

selamlar

teşekkür ediyorum kolay gelsin

 

[Seyit Tiken]

Makrolu Çözüm Örneği :

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A1:C100]) Is Nothing Then Exit Sub
If Target.Value > 100 Then
MsgBox "Hop, 100'den yukarı giremezsiniz", vbInformation
Target = ""
End If
End Sub

 

[ramazan_58]

selamlar

hocam makro ile başaramadım ama veri doğrulaamadan kolaylıkla yapılabiliyor yardımın için teşekkür ederim.

 

[asem]

seyit bey merhaba peki formül sonucu olarak bir kısıtı nasıl gireriz activecell değilde. mesala karışık içiçe bir sürü formül var en sonunda bunların sonucu s1 hücresine 1500 yazıyor ama ben 1400 den büyük bir değer çıkınca uyarı vermesini isityorum diyelimki bu formüller günlük olarak aşağı çekiliyor yani 365 tane var ve 48. satırınca 20 şubatta s1 1500 oluyor günüde gösteren uyarı mesajının makrosunu nasıl yazabilirim.

 

[Seyit Tiken]

Görmek ile tarif etmek bir olur mu? Olmaz dimi. En sağlıklısı, örnek bir dosya göndermek. Tahmini çözümler tren gibi uzar gider. Bakarsınız, çok pratik çözümler geliverir.

 

[asem]

haklısınız gün içinde ilk fırsatta örnek yolayacam.