Döngünün uzun sürmesi hkk

[mahmyt]

Üstatlarım merhaba;
Birincisi;

Ekteki excel de makro kodda döngü uzun sürmektedir.

İkincisi;
commandbutton3(baslat butonu)'de on error resume next komutunu kaldırınca If Cells(a, "e").Value = "#YOK" Then bu kodda hata vermektedir.

Ayrıca kod yapısında başka hatalarım da varsa söyleyebilir misiniz.

 

[Necdet]

Merhaba,
Döngü olayını anlamadım, hangi döngüden söz ediyorsunuz. Nokta atışı yapınız.
ikinci soru için aşağıdaki gibi kullanın :

If iserror(Worksheets(1).Cells(a, "e")) = True  Then ....

 

[mahmyt]

necdet üstadım; öncelikle teşekkür ederim döngü tarafındaki sorun nereden kaynaklı onu bulamadım en mantıklı yerden 1 saniye bekletme kodu uygulayınca şimdilik daha iyi sonuc vermektedir.