Soru Veri dogrulama ile sutununa veriyi 1 sefer girmek

[sebahattin]

Selamun Aleykum Dostlar ekte bulunan excel sayfam da
Burada yapmak istediğim konu her bolum 7 satırdan olusmadir .Yani 7B,14B,21B,28B ….....Diye satır 1000 kadar gitmekdedir.7B Hücresine örneğin 2536 varsa Yukarıdakı 7B,14B,21B,28B ….bu hücrelerde 2536 bir sefer girisine izin verilmesi konusunda yardımlarınınızı beklıyoruz

 

[Muzaffer Ali]

Merhaba.

B sütunun tamamını seçip veri doğrulama Özel seçip formül kısmına =ÇOKEĞERSAY(A:A;"<>";B:B;B1)<2 kopyalayınız.

 

[sebahattin]

SONUC YOK

 

[osman06turgut]

VBA kod ile daha düzenli bir sonuç elde edebilirsiniz. Dosya Ek'tedir. Kolay gelsin.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim kontrol As Range
Dim hucre As Range

If Not Intersect(Target, Me.Columns("B")) Is Nothing Then
Application.EnableEvents = False

For Each hucre In Target
If WorksheetFunction.CountIf(Me.Columns("B"), hucre.Value) > 1 Then
MsgBox "Bu değer zaten var! Tekrar girilemez.", vbCritical, "Aynı Değer Bulunmakta!"
hucre.ClearContents
End If
Next hucre

Application.EnableEvents = True
End If
End Sub

 

[Muzaffer Ali]

SONUC YOK

Veri Doğrulama uygulanmış dosya ekte.

 

[sebahattin]

Tesekkür edreriz Cözüldü