Makro kodunu istediğim satırdan başlatma

[balanar]

Merhaba,

Bir excel dosyamız var. Makro calıstıgında ilgili satırdaki tckimlik vs numaraları alıp sgk'ya aktarıp gelen verileri yine ilgili satıra aktarıyor.


1000 küsür satır var. Bazen problem cikiyor. Misal 700 satırda işlem yapmış kalanı yapmamış gibi. Böyle bir durumda mesela textbox gibi birşeye 700 yazıp veri aktar butonuna tıkladığımda direk ordan başlatmamın yolunu nasıl üretebiliriz?

 

[Mahmut Kök]

For s = Range("D1") To 2000

...

Next

Bu durumda döngü D1 hücresinde kaç yazıyorsa oradan başlar. 700 yazarsanız 700'den başlar.

 

[balanar]

Komple koda mudahele ettirecek bişey yokmu hocam

 

[YUSUF44]

Kod işlem yatıkları satırda bir hücreye işlemin tamamlandığını belirten bir ifade yazar. Sonra da if sorgusuyla o hücreler kontrol edilir, boş ise işlem yapılır, doluysa sonraki satıra geçilir.

 

[YUSUF44]

Şöyle mesela, H sütunu kontrol edilecek, Tamam yazıyorsa atlayacak, Tamam yazmıyorsa o satırda işlem yapacak ve işlemden sonra Tamam yazacak:

If cells(i,"H") <> "Tamam" Then
    kodlarınız
    cells(i,"H") = "Tamam"
End if

 

[balanar]

teşekkürler yusuf hocam