Kapalı sayfadan veri almak istiyorum

[ssavas]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Merhaba arkadaşlar.
Elimde yaklaşık 10.000 satırlık 2 Excel veritabanı dosyası var. VT1 de poliklinik protokol kayıt defteri verileri, VT2 de ise ilçe veri tabanı verileri var.
VT1 C sütunundaki hasta kimlik numarasını VT2 de ki b sütunundan kontrol edecek, kişinin kayıtlı olduğu birim adını (d) ve kayıt tarihini (e) alarak VT1 aranılan kişiye karşılık gelen h ve I hücrelerine aktaracak, veri bulamazsa kayıt bulunamadı yazacak.
Yardımcı olacak arkadaşlara teşekkür ederim.

 

Sayfanın Tümünde Ara ve ListBoxa Getir

Makronun sayfaları gizlemesini kaldırma

[AhmetRasim]

Merhabalar Sn. @s.savas
-- VT1 ve VT2 dosyalarının aynı klasörde olduğunu varsayarak aşağıdaki kodları kullanabilirsiniz.
-- Eğer VT2 dosyası başka bir klasörde ise ThisWorkbook.Path & "\VT2.xlsx" bu bölümü VT2 dosyasının bulunduğu klasör konumu ile değiştiriniz.

-- 10 bin satırlık bir veri oluşturup denedim ve yaklaşık 15 saniye gibi bir zamanda H ve I sütunu dolmuş oluyor.

Görüntülemek için giriş yapmanız gerekmektedir.
(28 satır)

 

[ssavas]

Elinize sağlık üstat. Bu şekliyle daha efektif oldu.
Klasik formül yöntemi ile de, şu şekilde çözüme ulaşmıştım.
Veritabanlarını Sayfa1 ve Sayfa2 de birleştirerek şu formülleri uyguladım.

Görüntülemek için giriş yapmanız gerekmektedir.
(2 satır)

 

[AhmetRasim]

Rica ederim.
Saygılarımla, iyi çalışmalar.