For Each döngüsünde sorun

[suphi75]

Arkadaşlar iyi günler.

Ekteki dosyada For each döngüsü kurarak işlem yaptırmak istiyorum . Fakat hatalı sonuç veriyor. Vaktinizi ayırım yardımcı olursanız sevinirim.

Saygılarımla

 

[suphi75]

ekini yolda düştü heralde hemen gönderiyorum.