Çözüldü Başka excelden veri alma formülü

Merhabalar Sn. @selis

-- metrik list.xlsx dosyası hep açık ise şu formülü
[formul]=DÜŞEYARA(SOLDAN(E2;BUL("-";E2)-1);'metrik list.xlsx'!Table1[[#Tümü];[hammadde]:[grup]];3;0)[/formul]

-- Dosya kapalı duruyorsa formülde aralık belirterek kullanabilirsiniz.
Dosyanın Konumunu Buraya Yazınız ile belirttiğim bölümü, bilgisayarınızdaki dosyanın konumuna göre değiştiriniz.
[formul]=DÜŞEYARA(SOLDAN(E2;BUL("-";E2)-1);'Dosyanın Konumunu Buraya Yazınız\[metrik list.xlsx]Sheet1'!$A$2:$C$746;3;0)[/formul]

Hocam elinize saglık cok teşekkür ederim, bu formulu koda nasıl cevırebilirim hocam?

Merhabalar Sn. @selis
Paylaştığım ExcelDestek_VLookup isimli makro kodunu mevcut modüllerden birinin içerisine ekleyip kullanabilirsiniz.

-- Dikkat etmeniz gereken kısım Kyok.xlsm ve metrik list.xlsx dosyaları aynı konumda olmalıdır.

Eğer metrik list.xlsx dosyası başka bir klasör altında bulunuyorsa
konum = ThisWorkbook.Path & "\metrik list.xlsx" satırındaki ThisWorkbook.Path kısmını ilgili klasör konumu ile değiştiriniz.

-- Kod içerisinde Eğerhata (IfError) Fonksiyonu ve Düşeyara (VLookup) Fonksiyonu bulunmaktadır.

Hocam cok teşekkür ederiim