Excel tablodan veri arayıp karşı satırı yazdırma

Question

Hocam bir sorum var yardımcı olursanız çok makbule geçer. A sütununda şehirler var. B,C,D,E... sütunlarında sayılar var. B11 hücresine sayı girdiğimde B12 hücresinde o sayının karşısındaki şehri yazsın istiyorum. Umarım anlatabilmişimdir. Kaçıncı indis formülü ile sadece tek sütun içinde arama yapabiliyorum, maalesef sorunu çözemedim. Yardımlarınız bekliyorum. şimdiden teşekkür ederim.

örnek dosyayı yükledim. http://dosya.co/kx9mrks7fpjh/ÖRNEK1.xlsx.html

Answer 1

Merhaba,

Basit bir makro ile bunu yapabilirsiniz. Hızlı başlangıç: Makro oluşturma makalesinden faydalanarak bir makro kaydedin. Kaydettiğiniz makroyu düzenleye basarak çıkan kodu aşağıdaki kod ile değiştirip çalıştırın.

Sub Bul()

ActiveSheet.Range("B13").Value = Cells(Cells.Find(What:=ActiveSheet.Range("B12").Value, After:=Cells(1, 1), LookAt:= _

            xlWhole, MatchCase:=True).Row, 1).Value

End Sub

B12 hücresi aranacak değeri

B13 hücresi ise bulunan değerin yazılacağı alanı belirtir.

Eğer değeri bulamaz ise A12 hücresinin içeriğini B13 e yazar.

Answer 2

Çok teşekkür ederim, istediğim sonucu verebiliyor ama formülle halledebileceğimiz bir yöntemi var mı acaba?