جمع زدن سلول های دارای فواصل معین

[mehdiasad]

سلام.
من میخوام سلول هایی رو با هم جمع کنم که دارای فاصله مشخصی از همدیگه هستند، به عنوان مثال داده اول در سلول 1، داده دوم در سلول 5، داده سوم در سلول 9، و سایر سلول ها با فاصله 4تایی از همدیگه قرار دارند. چطور امکان انجام این کار رو دارم؟

[ZAMEN58]

سلام
این را امتحان کنید شاید بدرد بخور باشه

[A.pourmahdi]

چگونه سلولهای بافواصل مشخص روباهم جمع کنیم؟

[iranweld]

با سلام

ظاهرا بایستی از کدنویسی استفاده کنید

در فایل پیوست از چه سطری جمع شروع شده و تعداد step را وارد نموده و بر روی باتن کلیک نمایید

Sub test()

z1 = Cells(Rows.Count, "A").End(xlUp).Row

For i = Range("b1") To z1 Step Range("b2")

sum = sum + Range("A" & i)

If Len(kk) = 0 Then

kk = Range("A" & i)

Else

kk = kk & "+" & Range("A" & i)

End If

Next

Range("B3") = sum

Range("d1") = kk

End Sub