Soru ÜRÜN ADINDAN FİYATI BULABİLME FONKSİYONU

Katılım
20 Mayıs 2020
Mesajlar
3
Excel Vers. ve Dili
türkçe 2019
Dostlar iyi günler excele yeni başladım. Bir arkadaşımın bu konuda ödevi var ve yardımcı olmak istiyorum. Önceden yazılmış ürünler ve fiyatlar var. Bunun yanında ürünün adını yazınca ürünün fiyatını gösteren 2 kutucuk yapmamız gerekiyor. Bunu nasıl yapabiliriz?
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,269
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
DÜŞEYARA fonksiyonunu araştırınız.
 

NADİR YILDIZ

Altın Üye
Katılım
7 Ocak 2006
Mesajlar
1,341
Excel Vers. ve Dili
2016 Türkçe
Altın Üyelik Bitiş Tarihi
09-02-2026
düşeyara formülü kullanabilirsiniz
 

seddur

Altın Üye
Katılım
12 Nisan 2012
Mesajlar
531
Excel Vers. ve Dili
Microsoft office professional plus 2019
Altın Üyelik Bitiş Tarihi
18-12-2024
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo hata
Dim KeyCells As Range
Set KeyCells = Range("A2")

If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
If KeyCells.Value <> "" Then
Dim urunBul As Range

Set urunBul = Worksheets("Liste").UsedRange.Find(KeyCells.Value, Lookat:=xlWhole)
Range("B2") = urunBul.Offset(0, 1).Value

End If

End If
Exit Sub
hata:
Range("B2").Value = "Ürün bulunamadı."
End Sub

"A2" ye ürünadı yazıyorsun "B2"de sonucu görüyorsun.
 
Üst