daha basit olarak. bunlar çok karışık
Sub deneme1()
Dim a(10, 10), st(10)
For i = 1 To 4
For j = 1 To 3
a(i, j) = Cells(4 + i, 2 + j)
st(i) = st(i) + a(i, j)
Cells(4 + i, 7) = st(i)
Next j
Next i
End Sub
elimde şöyle bir kod var. matristeki satırlar topluyor. (5,3) te başlıyor. öyle ifade ettim.
şimdi bu kodun hem satır hem sütun toplayanını istiyorum. Nasıl yapacağım ?
0