Düşeyara makrosu

[macay]

merhaba,
=DÜŞEYARA(AD14;[Kitap1]StkHrkIcm!$E$13:$H$644;2;0) şeklinde Excel hücresine yazdığım bir formülüm var ama bunu VBA olarak nasıl kayıt edeceğimi bulamadım...Bulduklarımın üzerinde çalıştım ama olmadı...yardım edebilirmisiniz...

 

[mesuttasar]

Forumda VLOOKUP olarak aratırsan bulursun.Benim bulduğum;

http://www.excel.web.tr/showthread.php?t=17226

 

[macay]

Sayın mesuttasar,

verdiğiniz link sadece excel'de hücre içine yazılan örnekler..Bana lazım olan VBA makro kod olarak yazacağım kod örneği

 

[mesuttasar]

Range("E1").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[1111]C,R[1111]C[1111]:R[1111]C[1111],2,)"

1111 olarak yazdığım yerler hücrelerin indislerini belirtiyor.Umarım fikir verir sana. Olmassa örnek dosya ekle bi bakayım.

 

[mesuttasar]

E1 hücresine düşeyara formülü yazacağız diyelim. Aranacak değer F1 , aranacak aralık A1:B100 ise formülümüz şu şekilde olur.

Range("E1").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],RC[-5]:R[99]C[-4],2,)"

 

[mesuttasar]

R[1]---->Bulunulan hücrenin 1 hücre altındaki hücre
C[1]---->Bulunulan hücrenin 1 hücre sağındaki hücre

R[-1]C[-1]----> Bulunulan hücrenin bir üst satırı ve solundaki hücre
R[1]C[1]----> Bulunulan hücrenin bir alt satırı ve sağındaki hücre

anlamına geliyor.Bende yeni başlayan biri olduğumdan dolayı böyle açılamalı yazdım.Yanlış anlaşılmasın.

 

[macay]

E1 hücresine düşeyara formülü yazacağız diyelim. Aranacak değer F1 , aranacak aralık A1:B100 ise formülümüz şu şekilde olur.

Range("E1").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],RC[-5]:R[99]C[-4],2,)"

sayın mesuttasar

gönderdiğiniz formülü

"ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[28],[Ana.xls]StkHrkIcm!R13C5:R644C8,2,0)" Range("B13").Select"

şeklinde değiştirdim oldu..Fakat çalıştırdığımda bu förmülü gidip B13 hücresine yazıyor..benim istediğim ise makroyu çalıştırdığımda B13 hücresine sadece gerekli bilgi gelsin bu yaptığımızla düşeyara formülünü yazıyor sadece.

Saygılar

 

[uzmanamele]

merhaba
bir formülü vba kodları ile nasıl yazarım diyorsanız galiba en basit yolu kayıt makrosu oluşturarak formülü yazmanız. daha sonra bu makro kodunu incelediğinizde kullandığınız formülün vba kodları ile nasıl ifade edildiğini görebilir ve kullanabilirsiniz.