Değişken Değerin Karşılığını Tabloda Aratmak

[yavuz_yil]

Üstatlar öncelikle hepinize hayırlı günler dilerim. Aşağıdaki linkte bir örnek dosyam var istediğimi yapamıyorum. İlgilenebilirseniz ve yardımcı olabilirseniz çok sevinirim.

http://dosya.altervista.org/download.php?file=2ee54c9c87c89d339e1bfe2ab574b959

Saygılarımla,

 

[Murat OSMA]

Makro ile çözüm isterseniz bu kodları kullanabilirsiniz;


İlgili sayfanın kod kısmına yazın ve B5 hücresine veri girip deneyin;

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Rky As Range
    If Target.Address(0, 0) <> "B5" Then Exit Sub
    For Each Rky In Range("G12:G21")
        If Target.Value = Rky.Value And _
           Target.Offset(0, 2).Value = Rky.Offset(0, 1).Value Then
           Target.Offset(0, 3).Value = Rky.Offset(0, 2).Value
        End If
        If Target.Value = Rky.Value And _
           Target.Offset(1, 2).Value = Rky.Offset(0, 1).Value Then
           Target.Offset(1, 3).Value = Rky.Offset(0, 2).Value
        End If
    Next Rky
    Set Rky = Nothing
End Sub

 

[turist]

E5 hücresine:

=EĞER(C5="A";TOPLA.ÇARPIM(($G$12:$G$21=$B$5)*($H$12:$H$21=D5)*($I$12:$I$21));TOPLA.ÇARPIM(($G$12:$G$21=$B$5)*($H$12:$H$21=D5)*($K$12:$K$21)))

formülünü uygulayın.
Formülü E6 ya kopyalayıp yapıştırın.

 

[yavuz_yil]

Hızlı geri dönüşleriniz için teşekkür ederim.Makrodan hiç anlamıyorum daha kendimizce excellde gelişmeye çalışıyoruz.Murat OSMA bey çok teşekkür ederim.

Sn.Turist A değeri için istediğim veriye ulaştım ancak B değerinide A değeri ile aynı veriyor.Onu nasıl düzeltebiliriz?

Saygılarımla,

 

[turist]

Verilen formülü E5 hücresine yazdıktan sonra kopyalayıp E6 hücresine yapıştırın.

 

[yavuz_yil]

Hallettim çok teşekkür ederim...Emeğinize sağlık.

Saygılarımla,

 

[ZorBey_]

Merhaba iyi çalışmalar
ekli dosyayı denermisiniz.
http://s3.dosya.tc/server16/gRQdZk/Say_.rar.html

 

[yavuz_yil]

İş yerinden girdiğim için erişimde sınırlandırma var.Sadece altervistaya erişim sağlayabiliyorum ama akşam eve gidince mutlaka bakacağım.

 

[yavuz_yil]

Merhaba iyi çalışmalar
ekli dosyayı denermisiniz.
http://s3.dosya.tc/server16/gRQdZk/Say_.rar.html

Çok teşekkür ederim. Elinize sağlık bu tabloda gerçekten çok işime yarayacak!!

Saygılarımla,