Formül sonucuna göre veri doğrulama

[Ermania]

Merhaba
Şöyle bir yardıma ihtiyacım var. Bir hücrede örneğin 4 rakamının üstünde veri olmasını istemiyorum. Girildiğinde de uyarı vermesini istiyorum. Bunu veri doğrulama ile yapabiliyorum fakat sonuç formül ile gelince herhangi bir uyarı vermemekte.

Örneğin
F1 HÜCRESİNE ŞUNU YAZIYORUM
=EĞERSAY(A1:E1;"HT")

Sonuç 4 ten büyükse yazmasın ve uyarı versin istiyorum. Ne yapabilirim?

 

[TiOr]

Slm,
Benzer bir konu inceleyiniz;
6 yazan rakamları 4 yazmanız yeterli olacaktır.

Hücreye Girilen Verinin Karakter Sayısını Belirleme

merhaba arkadaşlar; konunun yeri belki doğru olmayabilir..bunun için şimdiden özür dilerim... yapmak istediğim olay... hücreye girilen verinin karakter sayısını belirleme.. örnek olarak; a2 hücresine benim belirlediğim sayıda karakter ( 10 karakterden fazla girilmemesi gibi ) girilmesi..

www.excel.web.tr

İyi çalışmalar.

Sayfanın kod bölümüne;
Yalnız bu kodlar sayfadaki tüm hücreler için geçerlidir. Bu kodları kaydettikten sorna herhangi bir hücreye girdiğiniz tüm veriler, türüne bakılmaksızın ilk 6 karakteri kaydedilir.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len(Target) > 6 Then
Target = Left(Target, 6)
End If
End Sub

Eğer sadece belirli hücrelerde ya da sütunlarda/satırlarda bu işlem olacaksa onu target içine range olarak belirtmeniz gerekir.
Örneğin sadece B sütunu için aşağıdaki şekilde:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("b:b")) Is Nothing Then Exit Sub
If Len(Target) > 6 Then
Target = Left(Target, 6)
End If
End Sub

C5, C18 ve D6 hücreleri için ise aşağıdaki şekidle olmalıdır:

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("c5, c18, d6")) Is Nothing Then Exit Sub
If Len(Target) > 6 Then
Target = Left(Target, 6)
End If
End Sub

 

[Ermania]

Denedim oluyor fakat bu karakter uzunluğu için sanırım. ben 4 ten büyük sayı girilmesin istiyorum. ne yazmam gerek farklı olarak.

Birde uyarı verme olayı var tabi. Yapılamaz birşey değildir bu umarım.

 

[Ermania]

Aslınd sormak istediğim şey tam olarak "veri doğrulamayı formül olan hücrede nasıl kullabiliriz?"

 

[Ermania]

dosyayıda şöyle yukledım desteklerınızı beklıyorum

 

[kulomer46]

Değerli Arkadaşım

Talebinize Alternatif bir çözüm Ek 'tedir.

Selamlar...

Ekran Resmi

 

[Ermania]

Değerli Arkadaşım

Talebinize Alternatif bir çözüm Ek 'tedir.

Selamlar...

Ekran Resmi
Ekli dosyayı görüntüle 236714

Ustam ne kadar teşekkür etsem az. Tam istediğim gibi olmuş çok teşekkür ediyorum. Yalnız birşey soracağım. Kodlarda aynı şeyi 2 şer defa yazmışsınız ve 2 defa kontrol ediyor bu yuzden. Bilerek yaptığınız birşeymi yoksa alttaki 2 tanesını silsem sorun olurmu?

 

[kulomer46]

Merhaba

Kod Sayfasındaki yukardaki kod bloğu, eğer sonuç formül ile gelirse kontrol sisteminin çalışması için.

Kod Sayfasındaki aşağıdaki kod bloğu, eğer sonuç hücrelere elle girilmesi ile gelirse kontrol sisteminin çalışması için.

İkiside lazım

Selamlar...

 

[Ermania]

Merhaba

Kod Sayfasındaki yukardaki kod bloğu, eğer sonuç formül ile gelirse kontrol sisteminin çalışması için.

Kod Sayfasındaki aşağıdaki kod bloğu, eğer sonuç hücrelere elle girilmesi ile gelirse kontrol sisteminin çalışması için.

İkiside lazım : )

Selamlar...

hem çözümü sağlayıp hemde oluşabilecek sıkıntılara göre yaptığınız içinde tekrar teşekkür ederim.

 

[kulomer46]

hem çözümü sağlayıp hemde oluşabilecek sıkıntılara göre yaptığınız içinde tekrar teşekkür ederim.

Rica ederim

Selamlar...

 

[kulomer46]

Değerli Arkadaşım

Bazı aylar 31 gün çekmektedir.
Bunu dikkate alarak yukardaki #6 numaralı mesajdaki dosyanın, Ek 'teki güncellenmiş halini kullanmanız daha pratik olacaktır.

Selamlar...

Ekran Resmi

 

[Ermania]

Değerli Arkadaşım

Bazı aylar 31 gün çekmektedir.
Bunu dikkate alarak yukardaki #6 numaralı mesajdaki dosyanın, Ek 'teki güncellenmiş halini kullanmanız daha pratik olacaktır.

Selamlar...

Ekran Resmi
Ekli dosyayı görüntüle 236719

Evet onu farketmiştim. Kendim yapmaya çalıştım ama acemi olduğum için beceremedim Sizden de istemeye utanmıştım iyi oldu bu teşekkürler .

 

[kulomer46]

Evet onu farketmiştim. Kendim yapmaya çalıştım ama acemi olduğum için beceremedim Sizden de istemeye utanmıştım iyi oldu bu teşekkürler .

Selamlar...