• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Tablo dizinide ikinci sutuna göre düşeyara förmülü

Katılım
4 Ağustos 2009
Mesajlar
112
Excel Vers. ve Dili
Ofis 2010 TR 32 Bit
Bir tablo dizinimi mevcut ve ikinci ve üçüncü sutunlarda arama yaptırmaya BaşaRamadım.yardımlarınızı bekliyorum iyi akşamlar.şimdiden teşekürler,,,
 

Ekli dosyalar

Aşağıdaki formülleri deneyiniz..:cool:
=DÜŞEYARA(G2;B2:E6;1;YANLIŞ)
=DÜŞEYARA(G5;C2:E6;2;YANLIŞ)
 
ALAKANIZ İÇİN TEŞEKÜRLER.TAM ACIKLAYICI YAZAMADIM SANIRIM. EKSİK BIRAKMISIM YOK HAtASI VERDİĞİ YERE B SUTUNUNDA VEYA C SUTUNUNda BULUP BAKİYE ADEDİNİ YAZMASI.TABLO DİZİNİNDE OYNAMA YAPILMADAN OLA BİLİRMİ.
 

Ekli dosyalar

ALAKANIZ İÇİN TEŞEKÜRLER.TAM ACIKLAYICI YAZAMADIM SANIRIM. EKSİK BIRAKMISIM YOK HAtASI VERDİĞİ YERE B SUTUNUNDA VEYA C SUTUNUNda BULUP BAKİYE ADEDİNİ YAZMASI.TABLO DİZİNİNDE OYNAMA YAPILMADAN OLA BİLİRMİ.

dosyanız ektedir.:cool:
 

Ekli dosyalar

teşekürler dostum.tam bu fonk siyunu beceremiyorum ama dosya üzerinde çalışma yapayım.parlak bi fikir teşekürler gercekten...
 
Stok kodunu, kod başlıklı sutunların hepsinde aratıp a sutunundaki degeri getire bilirmiyiz acaba.
 

Ekli dosyalar

Stok kodunu, kod başlıklı sutunların hepsinde aratıp a sutunundaki degeri getire bilirmiyiz acaba.
kullanıcı tanımlı fonksiyon yaptım.
deg olarak aranacak hücreyi yazın,aralık ta ise bir aralık belirleyin.
başka dosyalarda kullanabilmek için verdiğim bu fonksiyonu oraya standart bir modüle kopyalamlısınız.

Kod:
Function evbul(deg As Range, aralik As Range)
Dim k As Range
Set k = aralik.Find(deg, , xlValues, xlWhole)
If Not k Is Nothing Then
    evbul = Cells(k.Row, "A").Value
    Else
    evbul = "YOK"
End If
End Function
 

Ekli dosyalar

kullanıcı tanımlı fonksiyon yaptım.
Deg olarak aranacak hücreyi yazın,aralık ta ise bir aralık belirleyin.
Başka dosyalarda kullanabilmek için verdiğim bu fonksiyonu oraya standart bir modüle kopyalamlısınız.

Kod:
function evbul(deg as range, aralik as range)
dim k as range
set k = aralik.find(deg, , xlvalues, xlwhole)
ıf not k ıs nothing then
    evbul = cells(k.row, "a").value
    else
    evbul = "yok"
end ıf
end function



alakanıza teşekürler dosyayı incelerken söyle bişi FARK ETTIM
a sutununda bakiyeleri güncellediğimde olusturdugunuz formüle etki etmiyor neden acaba.
 
Geri
Üst