Sütundaki aynı rakamda uyarı!

Katılım
14 Eylül 2008
Mesajlar
139
Excel Vers. ve Dili
Office 2003 Serisi
Üstadlar paylaştığım dosyada blok no diye bir sütun göreceksiniz. Buraya fabrikadaki blokların numarasını yazıyorum. Ama bazen aynı numaralar denk geliyor aynı numaraları iki kere girmemem gerekiyor. İstiyorum ki blok sütununa aynı değeri ikinci kez yzınca "Bu Blok Numarası Zaten Mevcut" diye bir uyarı versin bunu nasıl yapabilirim?
 

Ekli dosyalar

ynmcan

Altın Üye
Katılım
30 Ağustos 2008
Mesajlar
677
Excel Vers. ve Dili
2010 türkçe
Altın Üyelik Bitiş Tarihi
29-05-2025
Üstadlar paylaştığım dosyada blok no diye bir sütun göreceksiniz. Buraya fabrikadaki blokların numarasını yazıyorum. Ama bazen aynı numaralar denk geliyor aynı numaraları iki kere girmemem gerekiyor. İstiyorum ki blok sütununa aynı değeri ikinci kez yzınca "Bu Blok Numarası Zaten Mevcut" diye bir uyarı versin bunu nasıl yapabilirim?
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
For A = [C6566].End(3).Row To 1 Step -1
If WorksheetFunction.CountIf(Range("C5:C" & A), Cells(A, "C")) > 1 Then
MsgBox "Bu Blok Numarası Zaten Mevcut.!!!"
End If
Next
End Sub
 
Katılım
14 Eylül 2008
Mesajlar
139
Excel Vers. ve Dili
Office 2003 Serisi
Üstadlar hepinize teşekkürler. Sorun sayenizde çözüldü.
 
Üst