Başka sayfadan veri almak.?

[ZİNDAN]

Merhaba arkadaşlar.

Ekteki dosyada Sayfa3 de sürekli bulunacak bir liste var.Sayfa2' nin A sütununa yazdığım vergi numaraları eğer Sayfa 3' te varsa Sayfa3' ün C sütununa "EVET" yazsın, yoksa "HAYIR" yazsın.

Bunu yapabilirmiyiz arkadaşlar.



İlginiz için teşekkürler.

 

[veyselemre]

Sayfa3'ün C1 hücresine aşağıdaki formülü yazıp aşağı doğru kopyalayın.

=EĞER(EĞERSAY(Sayfa2!A:A;Sayfa3!B1)>0;"EVET";"HAYIR")

Not: Dosyanız kişisel bilgiler içerdiği için tarafımdan silinmiştir.

 

[ZİNDAN]

Teşekkürler sayın veyselemre, hem yardım ettiğiniz için, hemde kişisel verilerimi silerek beni düşündüğünüz için.

Bu işlemi makro yardımıyla yapabilirmiyiz peki.?

 

[veyselemre]

Sub Dene()
    With Range("Sayfa3!C1:C" & [b65536].End(3).Row)
        .FormulaR1C1 = "=IF(COUNTIF(Sayfa2!C[-2],Sayfa3!RC[-1])>0,""EVET"",""HAYIR"")"
        .Value = .Value
    End With
End Sub

 

[ZİNDAN]

Teşekkürler, Allah Razı Olsun.
Bu dosyayı kullanarak, beyannameleri unutmayı engellemeye çalışacağım.Benim için çok önemliydi.

Tam istediğim gibi oldu.
Teşekkürler.