veriler eşitse yanındaki sütunu ata

[excelnew]

Merhaba arkadaşlar;
Öncelikle teşekkürler, güzel bir sayfa hazırlamışsınız.
Yardımcı olsanız da olamasanız da teşekkürler.

A B C D
2 5 5 x
3 8 4 y
5 9 1 z
. . . .
. . . .
. . . .
yukarıdaki örnekten açıklamaya çalışayım sorumu;
A,B, C ve D ler sütunlar. burada amaç d sütunundaki sayıları bulabilmek.
yukarıdaki sayılardan açıklamaya çalışayım;
a sütunundaki tüm sayıları c1 hücresiyle karşılaştıracak. örnekte a3 hücresi c1 hücresiyle eşit çıktı. bu durumda b1 hücresindeki değeri d1 e atayacak.
döngü olarak söylersek =if(a1=c1;b1;if(a2=c1;b2;if(a3=c1;b3))) döngüsü d sütununa değer atayacak.
fakat iç içe if komutu sınırlı olduğu için yeterli olmuyor.
Başka bir yolu var mı bunun acaba?
Teşekkürler...

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Sub KARŞILAŞTIR()
    For X = 1 To [A65536].End(3).Row
    If Cells(X, 1) = [C1] Then Cells(X, 4) = Cells(X, 2)
    Next
End Sub

 

[excelnew]

Merhaba Sn. COST_CONTROL;
Öncelikle teşekkürler. Yazdığınız kod çalışmadı ya da ben beceremedim.
Aşağıda elde edilmesi gereken sonucu içeren bir dizi sayı var. Burada Q değerleri elde ediliyor. (gördüğünüz Q değerleri elde edilecek yani). amaç Ht ve Hg leri karşılaştırıp eğer değerler eşitse, Ht nin karşısındaki değeri Q sütununa yazdırmak. umarım daha iyi anlatmışımdır.
çabalarınız için teşekkürler.

Ht Qt Hg Q
75 0,16 79 0,38
76 0,215 82 0,634
77 0,27 83 0,7335
78 0,325 85 0,9325
79 0,38 85 0,9325
80 0,435 86 1,032
81 0,5345 89 1,3305
82 0,634 92 1,878
83 0,7335 92 1,878
84 0,833 93 2,102
85 0,9325 93 2,102
86 1,032 94 2,326
87 1,1315 94 2,326
88 1,231 95 2,55
89 1,3305 95 2,55
90 1,43 97 2,998
91 1,654 98 3,222
92 1,878 98 3,222
93 2,102 100 3,67
94 2,326 100 3,67

 

[excelnew]

Değerli COST_CONTROL;
sorunu çözdüm
=vlookup(c:c;a:b;2;false) (komut tr de düşeyara oluyor)

emeğinize teşekkürler.