For Next döngüsündeki hata

[hergelex]

Merhaba;

Aşağıdaki kodu bir türlü çalışır konuma getiremedim, yardımlarınızı rica ederim.

- “i” ve “z” , “k” değişkenleri mevcut
- Yapmak istediğim i değişkeninden k ya kadar bir döngü ancak burada z yide kullanmam gerekli.
• Cells(3,”m”) değerine cells(2,”l”) ve “ Tutar” birleşimini ataması
• Cells(4,”m”) değerine cells(3,”l”) ve “ Adet” birleşimini ataması
• .
• .
• .
• .
•



Range("M1").FormulaR1C1 = "Y2"
k = Cells(Rows.Count, "l").End(3).Row - 1
Range("M2").Select
Cells(2, "m").FormulaR1C1 = "=RC[-1]&"" Adet"""
For i = 3 And z = 2 To k
Cells(i, "m").Value = Cells(z, "l").Value & " Tutar"
Cells(i + 1, "m") = Cells(z + 1, "l") & " Adet"
i = i + 1
z = z + 1
Next i

 

[hamitcan]

sub nn()
for i = 2 to k
Cells(i,”m”) = cells(i,”l”) & " Tutar"
Cells(i+1,”m”)= cells(i+1,”l”)  & " Adet"
end sub

şeklinde deneyin.

 

[hergelex]

sub nn()
for i = 2 to k
Cells(i,”m”) = cells(i,”l”) & " Tutar"
Cells(i+1,”m”)= cells(i+1,”l”)  & " Adet"
end sub

şeklinde deneyin.

teşekkürler ancak o şekilde yapabiliyorum ikinci değişkenide işin içine katmam gerekli...

 

[hamitcan]

İkinci değişkeni nasıl kullanacaksınız, anlamadım.