Kod güncelleme

[sedat2161]

Hayırlı günler sayın hocalarım.

S1.Cells(sat_nO + 4, "d") = vrT(i, 39) - 1

Yukarıdaki kodda 39 hücreden 1 çıkarılıp aktarma yapılıyor.
Benim amacım ise bu kod aktarma yaparken hep 30 aktarma yapsın.

 

[Korhan Ayhan]

Sorunuzu birkaç kez okudum fakat tam olarak ne istediğinizi anlamadım.

Tahminen cevap veriyorum.


1 - S1.Cells(sat_nO + 4, "d") = vrT(i, 30) - 1
2 - S1.Cells(sat_nO + 4, "d") = vrT(i, 30)
3 - S1.Cells(sat_nO + 4, "d") = 30