• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

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

Ü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
 
Üstadlar hepinize teşekkürler. Sorun sayenizde çözüldü.
 
Geri
Üst