2 değişkene göre veri ataması

[ayaz84]

arkadaşlar sorumu açık olarak ekli dosyada anlatmaya çalıştım. Yardımcı olursanız çok sevinirim

 

[Ali]

Sayfa2'deki C1 hücresine

=İNDİS(Sayfa1!$D$1:$D$24;KAÇINCI(1;EĞER(Sayfa1!$B$1:$B$24=A1;EĞER(Sayfa1!$C$1:$C$24=B1;1));0))

yazıp direk enter tuşuna basmadan CTRL+SHIFT+ENTER tuşlarına birlikte basarak dizi formülü oluşturup aşağı doğru çekiniz.

Diğer alternatif kullanıcı tanımlı fonksiyonla olabilir.

Bir modüle

Function IkiliDusey(alan As Range, deger1 As String, deger2 As String, sutun As Byte) 'As String
Dim rng As Range
For Each rng In alan
On Error Resume Next
If deger1 = rng And deger2 = rng(1, 2) Then IkiliDusey = rng(1, sutun)
Next rng
End Function

yazarak ikili düşeyarama yapabilirsiniz.

3.Alternatif veri birleştirmesi yaparak düşeyara yapmaktır.


Örnek dosya ektedir.

 

[ayaz84]

teşekür ederim eline saglık...