Kişiye Ait En Son Veriye Ulaşma

eksiel

Altın Üye
Katılım
17 Ekim 2022
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
Altın Üyelik Bitiş Tarihi
20-09-2025
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

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,232
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
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

eksiel

Altın Üye
Katılım
17 Ekim 2022
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
Altın Üyelik Bitiş Tarihi
20-09-2025
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.
 
Üst