2sayfayı karşılaştırmak

[obenimm]

Merhabalar,

excellde sayfa1de sisteme girmiş oldugum mevcut kodlarım var, sayfa2 yede kodlarımı gırmek ıstıyorum fakat eğer aynı kod sayfa1 de varsa karsılastırmasını ve benı uyarmasını istiyorum,boyle bırsey yapılabılır mı ?
bilgi verebılırsenız sevınırım

 

[Ömer]

Merhaba,

Ad tanımlamaya, alan adını vererek aşağıdaki formülü tanımlayın.

=KAYDIR(Sayfa1!$A$2;;;BAĞ_DEĞ_DOLU_SAY(Sayfa1!$A:$A)-1)

Daha sonra Sayfa2 de A2:A20 arasını seçin ( seçim alanını genişletebilirsiniz. ) ve veri doğrulama menüsüne girerek izin verilen bölümden özel seçeneğini seçin ve formül bölümüne aşağıdaki formülü yazın.

=EĞERSAY(alan;A2)=0

Aynı menüdeki hata ve girdi uyarı bölümlerinden uyarı seçeneklerini de düzenleyebilirsiniz.

 

[obenimm]

merhabalar tekrar
bu formulle aynı olan kodları hıc gırdırmıyor yanlız ben kodları gırebılmeyı , aynı kod olan varsa bu kod sayfa1 de var

 

[Murat OSMA]

Ömer Bey'in müsadesiyle...

Sn. obenimm, şu kodları Sayfa2'nin kod kısmına yazı bir deneyiniz;

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Evn As Range
    If Target.Column <> 1 Or IsEmpty(Target.Value) = True Then Exit Sub
    Set Evn = Sayfa1.Columns(1).Find(Target.Value, , , xlWhole)
    If Not Evn Is Nothing Then
        Target.Offset(0, 1).Value = "..::.. Bu kod Sayfa1'de var ..::.. "
    End If
    Set Evn = Nothing
End Sub

Sayfa2'de A sütununa bir diğer sayfada olan bir veri girdiğinizde, B sütununda "Bu kod Sayfa1'de var" yazacak...

 

[obenimm]

Sn. Murat Bey siz muhtesemsınız, perfect 10 numara..

cok tesekkurler..

 

[Murat OSMA]

Estağfurullah, iyi günler...