- Katılım
- 10 Ekim 2010
- Mesajlar
- 1,469
- Excel Vers. ve Dili
- 2010 Türkçe
Merhaba
Aşağıdaki kodu, Formülden makroya çevrilmiştir. Kodu sayfaya her girişte güncelledik gayet güzel çalışıyor, ama bide B3:B aralığına veri girdikçe sonuçları görmek gerekiyor. Formül gibi dinamik yani. Ancak bu kodun baya bir hızlı çalışması gerekiyor. Makroya bu kritere göre daha fazla nasıl hızlandırabiliriz.
İlgileriniz için şimdiden çok teşekkür ediyorum.
İyi çalışmalar dilerim.
Aşağıdaki kodu, Formülden makroya çevrilmiştir. Kodu sayfaya her girişte güncelledik gayet güzel çalışıyor, ama bide B3:B aralığına veri girdikçe sonuçları görmek gerekiyor. Formül gibi dinamik yani. Ancak bu kodun baya bir hızlı çalışması gerekiyor. Makroya bu kritere göre daha fazla nasıl hızlandırabiliriz.
İlgileriniz için şimdiden çok teşekkür ediyorum.
İyi çalışmalar dilerim.
Kod:
Application.EnableEvents = False
Son = Range("C" & Rows.Count).End(xlUp).Row
With Range("C3:C" & Son)
.Formula = "=IF(B3="""","""",SUMIF(STOK!B:B,B3,STOK!D:D))"
.Value = .Value
End With
Application.EnableEvents = True