for next - Excel程式區 - 麻辣家族討論版版

[發問] for next

1^# 跳轉到 »

發表於 2021-3-29 11:38 | 顯示全部帖子

r1 = 4: r2 = 70: p = 1
If Range("j16") = 1 Then r1 = 70: r2 = 4: p = -1
For k = r1 To r2 Step p
N = N + p
Next k

靜思自在 : 【是否發揮了良能？】人間壽命因為短暫，才更顯得珍貴。難得來一趟人間，應問是否為人間發揮了自己的良能，而不要一味求長壽。