• DİKKAT

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

Kişiye Ait En Son Veriye Ulaşma

Katılım
17 Ekim 2022
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
Merhaba, iyi çalışmalar.

Ekte gönderdiğim tabloda kişiler ve sendikalar mevcut. "Sendika Kayıt Sayfası"na Userform ile kayıt yaptırdığımda Takip sayfasında ilgili kişinin karşısında son işleme ait bilgi gelmektedir. Ancak örnek tablo da kişi sayısı az olduğu için kayıt yaparken ve veriyi alırken hızlı işlem yapmakta tablonun orjinali 1800 kişiden oluşmaktadır. Kişi sayısı fazlalığı sebebiyle userform ile kayıt yaparken işlem uzun sürmektedir. Kişiye ait son veriyi getirirken Takip sayfasında kullandığım "ara" formülünün alternatifi var mı?

Ayrıca; "Sendika Kayıt Sayfası"na yapılan kayıtlarda işlem tarihine göre belirlediğim tarih aralığındaki kişilerin listesini "Listele" sayfasına aktarabileceğim bir makro var mı?

Konular hakkında desteklerinizi talep etmekteyim. Teşekkürler.
 

Ekli dosyalar

Merhaba,

Formül kullandığınız için verileri sayfaya kayıt ederken kodun hızlı çalışması için hesaplama yöntemini manuelle (ELLE) ayarlayarak yüksek performans sağlayabilirsiniz.

Aşağıdaki kod satırı hesaplama yöntemini manuel olarak ayarlar.

Application.Calculation = xlCalculationManual

Aşağıdaki satır ise tekrar otomatik olarak ayarlar..

Application.Calculation =xlCalculationAutomatic

Bu kod satırlarını kullandığınız makroda uygun yerlere yazarak kullanabilirsiniz.



Rapor içinde eki inceleyiniz. (Gelişmiş Filtre kullanılmıştır...)

Ayrıca ARA fonksiyonu yerine farklı bir fonksiyon kullandığım. İşinize yararsa asıl dosyanızda onu da deneyebilirsiniz.
 

Ekli dosyalar

Merhaba,

Formül kullandığınız için verileri sayfaya kayıt ederken kodun hızlı çalışması için hesaplama yöntemini manuelle (ELLE) ayarlayarak yüksek performans sağlayabilirsiniz.

Aşağıdaki kod satırı hesaplama yöntemini manuel olarak ayarlar.

Application.Calculation = xlCalculationManual

Aşağıdaki satır ise tekrar otomatik olarak ayarlar..

Application.Calculation =xlCalculationAutomatic

Bu kod satırlarını kullandığınız makroda uygun yerlere yazarak kullanabilirsiniz.



Rapor içinde eki inceleyiniz. (Gelişmiş Filtre kullanılmıştır...)

Ayrıca ARA fonksiyonu yerine farklı bir fonksiyon kullandığım. İşinize yararsa asıl dosyanızda onu da deneyebilirsiniz.

İlginize teşekkür ederim. Kolaylıklar dilerim.
 
Geri
Üst